SVN: toys/rsget.pl/Video/Delfi

[pawelz]

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 &#62; (?:Video|Видео) &#62; )?(.*?)</title>};
+       ! m{<title>(?:DELFI TV &#62; (?:Video|Видео) &#62;\s+)?(.*?)</title>};
        my $fname = de_ml( $1 );
        $fname =~ s{/}{_}g;
        $fname .= ".flv";
_______________________________________________
pld-cvs-commit mailing list
pld-cvs-commit@lists.pld-linux.org
http://lists.pld-linux.org/mailman/listinfo/pld-cvs-commit