Perlで文字列を一行ずつ処理する方法
読了まで:約0分
Perl で
Perl で
my $str = '複数行のテキスト';
my @lines = split m{\n}, $str;
foreach my $line ( @lines ) {
# 一行ずつ処理
}
と
ただ
で、s///
を
my $str = '複数行のテキスト';
$str =~ s/^\s*|\s*$//gs;
$str .= "\n";
$str =~ s{^(.*)\n}{
# 一行ずつ処理
}egm;
コレで
置換演算子s///
にegm
を
ただ
なんか