localtime is aware of the TZ environment variable. I'm in EDT, so a switch to EST will show up.

$ perl -e'print scalar(localtime),$/; local $ENV{TZ} = "EST"; print sc
+alar(localtime),$/;'
Tue May  9 22:38:06 2006
Tue May  9 21:38:06 2006
$
[download]