SVN: toys/rsget.pl/Video/Delfi
pawelz
pawelz at pld-linux.org
Tue Aug 3 11:31:50 CEST 2010
Author: pawelz
Date: Tue Aug 3 11:31:49 2010
New Revision: 11755
Modified:
toys/rsget.pl/Video/Delfi
Log:
- strip leading whitespaces from filename
Modified: toys/rsget.pl/Video/Delfi
==============================================================================
--- toys/rsget.pl/Video/Delfi (original)
+++ toys/rsget.pl/Video/Delfi Tue Aug 3 11:31:49 2010
@@ -20,7 +20,7 @@
start:
GET( $-{_uri} );
- ! m{<title>(?:DELFI TV > (?:Video|Видео) > )?(.*?)</title>};
+ ! m{<title>(?:DELFI TV > (?:Video|Видео) >\s+)?(.*?)</title>};
my $fname = de_ml( $1 );
$fname =~ s{/}{_}g;
$fname .= ".flv";
More information about the pld-cvs-commit
mailing list