>perl -le "use POSIX; print((POSIX::mktime(localtime) - POSIX::mktime(gmtime)) / 60 / 60);"
-5