SVN: toys/rsget.pl/RSGet/Curl.pm

[sparky]

Author: sparky
Date: Mon Oct 12 19:54:54 2009
New Revision: 10768

Modified:
   toys/rsget.pl/RSGet/Curl.pm
Log:
- cutoff everything after ? in uri if downloading to file


Modified: toys/rsget.pl/RSGet/Curl.pm
==============================================================================
--- toys/rsget.pl/RSGet/Curl.pm	(original)
+++ toys/rsget.pl/RSGet/Curl.pm	Mon Oct 12 19:54:54 2009
@@ -218,6 +218,7 @@
 	} else {
 		my $eurl = $curl->getinfo( CURLINFO_EFFECTIVE_URL );
 		$eurl =~ s#^.*/##;
+		$eurl =~ s/\?.*$//;
 		$fname = de_ml( uri_unescape( $eurl ) );
 	}