Select Code to Download

use strict;
use Time::localtime;
...
print "$month/$day/$year\n";
my $s = "$month/$day/$year";
print "s: $s\n";

Use of uninitialized value at test.pl line 5.
Use of uninitialized value at test.pl line 5.
Use of uninitialized value at test.pl line 5.
//