{
   local $ENV{TZ} = 'EST';
   print scalar localtime(), "\n";
}