Author: glen Date: Thu Oct 4 21:20:22 2012 New Revision: 12590 Added: toys/rsget.pl/Video/Err Log:
added etv.err.ee downloader Added: toys/rsget.pl/Video/Err ============================================================================== --- (empty file) +++ toys/rsget.pl/Video/Err Thu Oct 4 21:20:22 2012 @@ -0,0 +1,30 @@ +# $Id: Delfi 12105 2011-02-03 09:44:17Z glen $ +# Video::Err - Video getter plugin for rsget.pl +# +# 2012 (c) Elan Ruusamäe <[email protected]> +# This program is free software, +# you may distribute it under GPL v2 or newer. + +name: Err +short: V:Err +web: "http://etv.err.ee/"; +uri: qr{etv\.err\.ee/arhiiv.php\?id=[0-9]+} +# limit slots bacause rtmp support is very bad +slots: 3 +status: OK 2012-10-04 + +start: + GET( $-{_uri} ); + + ! m{loadFlow\('flow_player', '(rtmp://.*?)','mp4:(.*?)'\)}; + + my $rtmp = de_ml($1); + my $fname = de_ml($2); + + INFO(name => $fname, quality => "mp4"); + + my $url = $rtmp. '/'. $fname; + + DOWNLOAD($url, fname => $fname); + +# vim: filetype=perl:ts=4:sw=4 _______________________________________________ pld-cvs-commit mailing list [email protected] http://lists.pld-linux.org/mailman/listinfo/pld-cvs-commit
