Perlのよく使うワンライナー（テキスト処理）

Fri, 05 Apr 2019 00:00:00 +0900

Perlのワンライナー。 sedやawkでは扱いにくい、複雑な条件分岐や変換が必要なテキスト加工（CSVファイル処理など）に適している。UTF-8が標準化した現在では文字コード変換のニーズは減っているが、複雑な正規表現やPerlの組み込み機能を活用できる場面では有用である。いろいろオプションはあるのだが、最小限に絞って備忘録的に。

よく使うオプション

基本

-e 'スクリプト'：実行するPerlスクリプトを指定（1行）

perl -e 'print "Hello"'

output:

Hello

入力が前提

-l：（入力から改行を取り除いたうえで最後に）出力結果を改行する。表示制御の目的で使われることが多い。データ加工の際は使わないほうが安全（使うとしても最後の処理として）。

perl -le 'print "Hello"'

output:

Hello

-n：ファイルを読み込んで1行ずつ（whileで）処理する。行の内容は特殊変数$_に格納される。

perl -ne 'func' file

は

perl -e 'open(FILE, "< file"); while(<FILE>) { func($_); }'

と同じことになる。

perl -ne 'print $.": ".$_' rand.txt

output:

-p：-nに加えて結果の$_をprintする。sed -eみたいなことをするときに使う。

perl -pe 's/[0-3]/A/g' rand.txt

output:

9
4
AA
5A
45

-0777：入力を行ごとに区切らない。-pや-eと同時に用いられる。行ごとに変わるはずのない文字コード判別などの際に使う。

perl -MEncode::Guess -0777 -ne 'print guess_encoding($_, qw/shiftjis eucjp utf8/)->name' multibyte.txt

output:

utf8

-i　ファイル名：ファイルの上書き
-i拡張子ファイル名：ファイルの上書き＆拡張子付きのバックアップファイル生成

-iオプションは末尾（スクリプトの後）に記述すること。それ以外の位置だとマルチバイト文字を含む場合などうまくいかないことがある。

Perl on Marketechlabo

Perlのよく使うワンライナー（テキスト処理）

よく使うオプション

基本

入力が前提