さくらむすびテキスト抽出スクリプト

http://tate.undef.jp/read-sakura-csx.zip
ActivePerl 5.8.7 用。同じフォルダにsakura.csxを置いて、コマンドプロンプトから 「perl read-sakura-csx.txt」 1時間ほどで出力完了。(2chのスレに貼ったのと同じものです)