Select Code to Download

 #!/usr/bin/perl -w
use File::Copy;
...
    print "$filename2 is up to date!\n";
    print "No files copied!\n";
}

$filename1 = "u:/curtisbl/documents/conditional.sql.txt";
($seconds, $minutes, $hours, $day_of_month, $month, $year, $wday, $yda
+y, $isdst) = 
localtime($filename1);
printf ("Time: %02d-%02d-%04d\n", $month+1, $day, $year+1900);