my ($time1) = localtime;
my  $time2  = localtime;

print "$time1 / $time2\n";