- ok, if there are no hits, make sure $num is undefined.

[infobot.git] / blootbot / src / Net.pl

diff --git a/blootbot/src/Net.pl b/blootbot/src/Net.pl
index 967bb9064cfd6f8c17ac4ab32f2012ebd9673630..083d62be82dd7481f5b2968349085e566528c9fe 100644 (file)
--- a/blootbot/src/Net.pl
+++ b/blootbot/src/Net.pl
@@ -5,8 +5,7 @@
 #  Created: 20000309
 #
 
-if (&IsParam("useStrict")) { use strict; }
-
+#use strict;
 use vars qw(%ftp);
 
 # Usage: &ftpGet($host,$dir,$file,[$lfile]);
@@ -54,7 +53,7 @@ sub ftpGet {
                &status("FTP: local size is $lsize; downloading.") if ($verbose_ftp);
            } else {
                &status("FTP: same size; skipping.");
-               &system("touch $thisfile");     # lame hack.
+               system("touch $thisfile");      # lame hack.
                $ftp->quit();
                return 1;
            }
@@ -65,7 +64,7 @@ sub ftpGet {
        return 0;
     }
 
-    my $start_time = &gettimeofday();
+    my $start_time     = &timeget();
     if (defined $lfile) {
        &status("FTP: getting $file as $lfile.") if ($verbose_ftp);
        $ftp->get($file,$lfile);
@@ -81,7 +80,7 @@ sub ftpGet {
        }
     }
 
-    my $delta_time = &gettimeofday() - $start_time;
+    my $delta_time     = &timedelta($start_time);
     if ($delta_time > 0 and $verbose_ftp) {
        &status(sprintf("FTP: %.02f sec to complete.", $delta_time));
        my ($rateunit,$rate) = ("B", $size / $delta_time);