#!perl -lp use POSIX;$ENV{TZ}="right/GB";$_=strftime"%F %T",gmtime$_