Select Code to Download

use strict;

...
}
my $end_time = ctime();
print "\nEnd Time: $end_time\n";

C:\Perl\test>file_stat.pl "t:/international" > c:\res\inter.csv
The handle is invalid.
...

C:\Perl\test>