すべての行の最初の部分を削除するには？

Question

は、私はフォーマットであるテキストファイルがあるとしましょう：

S1:I am line one. 
S2:I am line two. 
S3:I am line three. 
S4:I am line four. 

（IだけI am line one.などが残っていますように）どのように私は、各行のIDの一部を削除することができますか？入力レコードセパレータ$/を変更するか、IDを削除する正規表現を使用する方が良いですか？

Answer 1

これはおそらく？

open my $fh, '<', $filename or die qq{Unable to open "$filename" for input: $!}; 

while (<$fh>) { 

    s/^[^:]*://; 

    # Use remainder of line left in $_ 
}