最近の Perl Tips
2002-04-05-1
- 「あらら」を「\xa4\xa2\xa4\xe9\xa4\xe9」にする oneliner。
ソースに日本語コードを直接書けないときに便利。
するときはまった。
- クォート: 今まではヒアドキュメントを使っていたので行数くってた。
こうすれば良かったのだ。
ソースに日本語コードを直接書けないときに便利。
% perl -F"''" -ape 'map {printf "\\x%x", ord} @F;'- BEGIN ブロックでは __DATA__ から読み込めない(仕様)。モジュール化
するときはまった。
- クォート: 今まではヒアドキュメントを使っていたので行数くってた。
こうすれば良かったのだ。
print qq!<a href="$fn"><img src="$tn"></a>\n!;