2009-09-06から1日間の記事一覧

シンボリックリファレンス

人に説明できるほど知らなかったので調べてみた。 プログラミングPerl P304から引用。 ハードリファレンス以外の値をデリファレンスしようと試みると、何が起こるだろうか?その場合には、値はシンボリックリファレンス(symbolic reference)として扱われる。…

ワンライナー

datファイルを1行ずつ出力 perl -e 'print $_ while (<>)' dat datファイルのうち、Kotaroにマッチする行を出力 perl -n -e 'print "$_\n" if m/Kotaro/' dat datファイルを置換して出力 perl -p -e 'print s/Kotaro/Taro/' dat numファイル中にある数字表…

Encode

よく理解していなかったので、覚えたことを書いておく。 エンコード変換 入力されるファイルはutf-8で、Linuxの文字コードはeuc-jp前提。 use strict; use Encode; open (my $fh, "<$ARGV[0]"); while(<$fh>) { chomp; Encode::from_to($_, "utf-8", "euc-jp…