SVN: toys/rsget.pl/Get/FileSonic
pawelz
pawelz at pld-linux.org
Sun Aug 29 21:22:28 CEST 2010
Author: pawelz
Date: Sun Aug 29 21:22:27 2010
New Revision: 11790
Modified:
toys/rsget.pl/Get/FileSonic
Log:
- fixes catching "File not found" error
Modified: toys/rsget.pl/Get/FileSonic
==============================================================================
--- toys/rsget.pl/Get/FileSonic (original)
+++ toys/rsget.pl/Get/FileSonic Sun Aug 29 21:22:27 2010
@@ -21,7 +21,7 @@
GET( $-{_uri} );
ERROR( "file not found: $1" )
- if m#<div class="section CL1 errorMessage">.*?<p>(.*?)</p>#s;
+ if m#<div class="section CL1">.*?<p>\s*(.*?)\s*</p>#s;
! m#<p class="fileInfo filename">.*?<strong>(.*?)</strong>#;
( my $fn = $1 ) =~ s/\.\.\./\0/;
More information about the pld-cvs-commit
mailing list