* parse .torrent file and print list of files

 * parse .torrent file and print list of files
 * this script couldn't many .torrent file because of Convert::Bencode bugs like below
{{{
Use of uninitialized value $item in string eq at Perl/site/lib/Convert/Bencode.pm line 127.
Use of uninitialized value $item in string eq at Perl/site/lib/Convert/Bencode.pm line 138.
Use of uninitialized value $item in string eq at Perl/site/lib/Convert/Bencode.pm line 148.
}}}

git-svn-id: https://lab.mitty.jp/svn/lab/trunk@135 7d2118f6-f56c-43e7-95a2-4bb3031d96e7