2007-03-07 perl memo 16進にされた2バイトの文字列をバイナリー文字列にする。 pc $i =~s/([0-9a-fA-F][0-9a-fA-F])/pack("C", hex($1))/eg;