perl -MTime::Local -e '$time = timegm(0,0,0,1,0,70); print"$time\n"' #### perl -MTime::Local -e '$time = timelocal(40,46,3,9,8,101); print" $time\n"'