一応本当にやりました。Ruby使ってます。使用したライブラリはmechanizeなのでperlでも作れます。そしてこの処理なら多分perlの方が速いと思います…。【追記】コメント欄にて要望があればスクリプトのソース公開します。
http://www.nicovideo.jp/watch/sm10984956