//EDIT:
Ich bekomme mit Date::Parse bessere Ergebnisse!
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
root@svr ~] perl
use Date::Language;
print "\n", "Date::Parse ", '#' x 20, "\n";
$anfang_in = '29 Okt 2011 8:30';
print "Anfang: '$anfang_in'\n";
my $lang = Date::Language->new('German');
my $time2 = $lang->str2time($anfang_in);
#my ($ss,$mm,$hh,$day,$month,$year,$zone) = strptime($anfang_in);
print "str2time: $time2\n";
print "time2str: ", $lang->time2str("%d %b %Y %R %Z",$time2),"\n";
__END__
Date::Parse ####################
Anfang: '29 Okt 2011 8:30'
str2time: 1319869800
time2str: 29 Okt 2011 08:30 MEST
Damit ist Date::Parse wohl das sinnvoller zu verwendende Modul.
Ich verwende auch nie mktime oder localtime wegen mancher Umwandlungsprobleme bei Timezones.
Last edited: 2011-01-10 19:10:38 +0100 (CET)