und noch was:
my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) =
localtime(1115030768);
print "$sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst\n";
--
: But for some things, Perl just isn't the optimal choice.
(yet) :-)
-- Larry Wall in <199702221943.LAA20388@wall.org>