如何删除每行的第一部分？

Question

假设我有一个格式为以下格式的文本文件：

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

如何删除每行的 ID 部分（这样我就只剩下 I am line one. 等等）？更改输入记录分隔符 $/ 还是使用删除 ID 的正则表达式更好？

Answer 1

也许像这样？它使用正则表达式匹配所有内容，包括第一个冒号 : 并将其删除

perl -pe 's/^[^:]*://' myfile > newfile

在一个程序中：

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

while ( <$fh> ) {

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

    # Use remainder of line left in $_
}

如何删除每行的第一部分？

How to remove first part of every line?

perl

parsing

delimiter