#  0    1    2     3     4    5     6     7     8
($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = (localtime)[0,1,2,3,4,5,6,7,8];