Ustream から自分の録画データをダウンロードして、 SMILEVIDEO 用にエンコードするツール

書いたので共有しときます。

ソース汚いです＞＜誰か、直して＞＜
http://svn.coderepos.org/share/lang/perl/misc/ust_smile_util.pl

使い方

コマンドみたいになってるので、以下のような感じで実行してください

$ perl ust_smile_util.pl
Username: hogehoge
Password: fugafuga
command> list
0 hoge movie
1 fuga movie
2 piyo movie
：
番号付きで動画の一覧が出る
：
command> ust2smile 0 1 2
：
ログがだーっと出る。
ダウンロードして保存してエンコードの繰り返し
：
command> quit

作業は、すべてカレントディレクトリで行われます。