$ perl -wle' use Time::Local qw(timelocal_nocheck); my $month = 11; # dezember! monate von 0-11 my $year = 2005; my $tl = timelocal_nocheck(0,0,0,0,$month,$year); print scalar localtime $tl;' Wed Nov 30 00:00:00 2005