Perlのファイル内の文字列置換をワンライナではなくスクリプトでやる1つの方法

Perlのファイル内の文字列置換をワンライナではなくスクリプトでやる1つの方法

よくワンライナで、 % perl -pi -e 's/foo/bar/' file とかやって、fileの中身の foo を bar に置換する...概要を表示 よくワンライナで、 % perl -pi -e 's/foo/bar/' file とかやって、fileの中身の foo を bar に置換するけど、それをスクリプトでやりたいときはどうするんだと同僚に聞かれて実験してみた。当たり前だけど、下記のようにしたら出来た。これって正しいのだろうか。 #!/usr/local/bin/perl -pi use strict; s/foo/bar/; 追記： Perlクックブックに載っていた模様。 場所は7章の「レシピ7.9 ファイルを-iスイッチを使って、その場で更新する」。 やり方は↑のやつでいいみたい。shebangにオプションでよいようです。 ちなみにあなたが漢であるならば必要ないが、「-i」オプションを「-i.orig」とするとバックアップのファイル(filename.orig)を勝手に作ってくれるので吉。

• Perl