Help for this page
my $inttime = time; my @local_tm = localtime($inttime); ... $ENV{TZ} = $tz; @local_tm = localtime($inttime); print @local_tm[2],":",@local_tm[1],":",@local_tm[0]," ",$tz,"\n";
11:5:40 EST5EDT 10:5:40 EST5