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