my %timehash;
@timehash{ qw/sec min hour mday mon year wday yday isdist/ }
    = ( localtime );