コマンドラインのperl

自分がよく使うコマンドを紹介。オプションとしては、以下をよく使う。

-e

以下に続く引数をperlとして実行する。スクリプト書くのがめんどい時。

-M

モジュールをuseする。スクリプトに書くのがめんどい時。

-I

@INCを指定する。use libを書くのがめんどい時。

例えば、以下のように利用。

□モジュールHoge::Fooがインストールされているか調べたい

$ perl -MHoge::Foo -e 'print 1'

(-eオプション以下は略せる)

□モジュールHoge::Fooのインストールされているpathを調べたい

$ perl -MHoge::Foo -e 'print $INC{"Hoge/Foo.pm"}'

□ファイルを作らずにお試しでスクリプトを実行したい

$ perl
sub hoge{print "test\n"}
hoge();

　・・・と打ってから、Ctrl + Dで標準入力を実行させられる

□sendmailにsjisの半角仮名を食わせたい

$ perl -MJcode | sendmail -t
print Jcode->new(<<TEXT, 'euc')->sjis();
From: hogehoge\@foo.com
To: nununu\@howa.com

ハンカク仮名をここに打つ
TEXT

　・・・と打ってから、Ctrl + D

コマンドラインを使いこなせると、ちょっとしたことでスクリプトを書かずに済むのでとっても楽になる。