my $t = localtime;