2005-09-17から1日間の記事一覧
雛形 1行づつ読み込んでは出力する。while ( $line = <> ){ print $line; } 行区切りを無効にする。字下げのある改行だけを本当の改行として認識してそれ以外の改行は無視する undef $/;while ( $line = <> ){ $line =~ s/\n /xxxxxx/g; $line =~ s/\n //g; …
雛形 1行づつ読み込んでは出力する。while ( $line = <> ){ print $line; } 行区切りを無効にする。字下げのある改行だけを本当の改行として認識してそれ以外の改行は無視する undef $/;while ( $line = <> ){ $line =~ s/\n /xxxxxx/g; $line =~ s/\n //g; …