$ perl -MDateTime -le " print DateTime->now( qw[ time_zone Asia/Tel_Aviv ] )->strftime( q/%F-%H:%M:%S%z/) " 2016-03-30-06:04:01+0300 $ perl -MDateTime -le " print DateTime->now( qw[ time_zone GMT ] )->strftime( q/%F-%H:%M:%S%z/) " 2016-03-30-03:05:58+0000