print scalar localtime(), "\n";
$ENV{TZ}="Europe/London";
print scalar localtime(), "\n";