Net-NicoVideo
view release on metacpan or search on metacpan
lib/Net/NicoVideo.pm view on Meta::CPAN
853854855856857858859860861862863864865866867868869870871872873
$ua
=
$self
->through_login(
$ua
);
# login
$res
=
$ua
->request_mylist_rss(
$mylist
);
# try again
}
When login goes wrong, then croak.
=head2 download(video_id, file)
download() is a shortcut to download video which is identified by video_id.
For busy person, you can download a video by one liner like this:
$ perl -MNet::NicoVideo -e 'Net::NicoVideo->new->download(@ARGV)' \
smNNNNNN ./smile.mp4
Note that it is necessary to set environment variables in advance.
Although the media file to download may be MP4, it may not be so.
Either MP4, or FLV or SWF is known now.
By "thumbinfo" object which has same video_id can judge type of media.
( run in 0.549 second using v1.01-cache-2.11-cpan-ec4f86ec37b )