Select Code to Download

Global symbol "$sec" requires explicit package name at - line 100.
Global symbol "$min" requires explicit package name at - line 100.
...
Global symbol "$ct" requires explicit package name at - line 171.
Global symbol "$ct" requires explicit package name at - line 171.
Execution of - aborted due to compilation errors.

Global symbol "$sourcefile" requires explicit package name at - line 1
+58.

open(OLD,"/inside29/urchin/test/logfiles/$filename") || die ("Cud not 
+open the $sourcefile");

open(OLD,"consolidatedlog.txt") || die ("C not open the $sourcefile");

my $yesterday = time() - ( 24 * 60 * 60 ); ## Why use 'my' here ######
+###########

...
        $m = "0$m"; ## <<< And this? ####################
}
$yesterday = "$year" . "$m" . "$d"; ## Why all those "s? #######