Perl の便利な 1 行コマンド

Perl で大量のファイルの文字を置換する

*.html と *.pl のファイル中にある "txt" という文字をすべて "text" に置き換える場合


# perl -pi -e "s/txt/text/g" *.html *.pl

改行コードを変えたい場合には以下のような感じで。


# perl -pi -e "s/\015\012/\015/g" *.txt

MIME エンコード/デコード

ファイルをエンコード perl -MMIME::Base64 -0777 -ne 'print encode_base64($_)' < file ファイルをデコード perl -MMIME::Base64 -ne 'print decode_base64($_)' < file

標準入力をエンコード echo "This is a test." | perl -MMIME::Base64 -0777 -ne 'print encode_base64($_)' 標準入力をデコード echo "VGhpcyBpcyBhIHRlc3QuCg==" | perl -MMIME::Base64 -ne 'print decode_base64($_)'

目次へ