2009-07-29 縦 → 横 変換 Perl ワンライナー Perl レコードセパレータが1つ以上の空行で、レコード内に改行文字を1つ含むデータを1行1レコードに変換する Perl ワンライナー。元のファイル。 $ cat aaa.txt line1 line2 line1 line2 line1 line2 変換する。 $ perl -i.org -00 -pe 's/^(.*)\n(.*)\n+$/$1 $2\n/' aaa.txt 変換後のファイル。 $ cat aaa.txt line1 line2 line1 line2 line1 line2