my $timestr=POSIX::strftime(@{$self}[0..9]);