SVN: toys/rsget.pl/Get/DepositFiles

[sparky]

Author: sparky
Date: Sun Sep 13 13:24:27 2009
New Revision: 10593

Modified:
   toys/rsget.pl/Get/DepositFiles
Log:
- allow gigabyte-sized files


Modified: toys/rsget.pl/Get/DepositFiles
==============================================================================
--- toys/rsget.pl/Get/DepositFiles	(original)
+++ toys/rsget.pl/Get/DepositFiles	Sun Sep 13 13:24:27 2009
@@ -10,7 +10,7 @@
 
 	ERROR( "file not found" ) if /Such file does not exist /;
 
-	! m{<div class="info">.*?<b title="(.*?)">.*?</b>\s*<span .*?>.*?<b>(\d+(\.\d+)?)&nbsp;([KM]B)</b></span>}s;
+	! m{<div class="info">.*?<b title="(.*?)">.*?</b>\s*<span .*?>.*?<b>(\d+(\.\d+)?)&nbsp;([KMG]B)</b></span>}s;
 	my $name = $1;
 	my $size = "$2$4";
 	INFO( iname => $name, asize => $size );