2004-12-11から1日間の記事一覧
BASE64をデコードしたくなったので、どうせ暇だからモジュールを使わずになるべく短いコードを作ってみようと思って、こんなコードを書いていたら(まだ最適化途中) perl -e 'while(){print pack("B*",join("",map{substr(unpack("B*",pack("C",$_)),-6)}gr…
BASE64をデコードしたくなったので、どうせ暇だからモジュールを使わずになるべく短いコードを作ってみようと思って、こんなコードを書いていたら(まだ最適化途中) perl -e 'while(){print pack("B*",join("",map{substr(unpack("B*",pack("C",$_)),-6)}gr…