{
    local $\ = "\n";
    print scalar localtime;
    {
        local %ENV;
        $ENV{TZ} = 'GMT';
        print scalar localtime;
    }
    print scalar localtime;
}