SVN: toys/rsget.pl/Video/Err

[glen]

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 <glen at pld-linux.org>
+#		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