($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime();
(undef,undef,undef,$mday,$mon,$year) = localtime();