PerlでHTTP Proxy作ってみた

PerlでHTTP Proxy作ってみた

大学の「情報特別演習I」で簡単なHTTP Proxy作ってみました。ただのProxyには興味がないので、通信内容をtelnetから見れるようにしたり、通信内容を保存できるようにしてみました。使ったモジュールはPoCo::Server::TCP、PoCo::Client::HTTP、PoCo::Filter::HTTPDあたりと、あとまぁ適当に。全部で500行程度です。Perl可愛いよPerl。まだ未完成な部分(SSL対応とかストリーミング対応とか)があるので、ちゃんと出来たらどこかに載せるかも、あまり期待はしないでください。なお、ニコ動の規約によるとツール等を使った動画の保存はNGだそうなので、まねしないでください。注:めんどくさかったのでBGMはありません、あしからず。追記: http://mitty.jp/orz/20090116.html から入手できるようにしました。(まさに誰得)

http://www.nicovideo.jp/watch/sm5672695