SVN: toys/rsget.pl/Get/UlozTo

sparky sparky at pld-linux.org
Thu Oct 14 12:51:55 CEST 2010


Author: sparky
Date: Thu Oct 14 12:51:54 2010
New Revision: 11844

Modified:
   toys/rsget.pl/Get/UlozTo
Log:
- ignore video duration if there is any


Modified: toys/rsget.pl/Get/UlozTo
==============================================================================
--- toys/rsget.pl/Get/UlozTo	(original)
+++ toys/rsget.pl/Get/UlozTo	Thu Oct 14 12:51:54 2010
@@ -22,7 +22,7 @@
 	! m{<h2 class="nadpis" .*?><a href=".*?">(.*?)</a></h2>};
 	my $name = $1;
 
-	! m{<div class="info_velikost" .*?><div>($STDSIZE)</div></div>}o;
+	! m{<div class="info_velikost" .*?><div>(?:[\d:]+\s*\|\s*)?($STDSIZE)</div></div>}o;
 	INFO( name => $name, asize => $1 );
 
 	! $-{form} = $self->form( name => "dwn" );


More information about the pld-cvs-commit mailing list