in reply to Date::Calc and and daylight savings time
while( my( $epoch, $wanted ) = each %date_pairs ){ use Time::Piece qw/ localtime gmtime /; use Date::Language; my $tp = gmtime( $epoch ); $tp = $tp->add_years( 31 ); my $lang = Date::Language->new('German'); my $got = $lang->strftime("%A, %d.%m.%Y - %H:%M:%S", $tp ); print "$got\n$wanted\n\n"; }
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re^2: Date::Calc and and daylight savings time
by marek1703 (Acolyte) on Jan 01, 2015 at 11:30 UTC | |
by Corion (Patriarch) on Jan 01, 2015 at 11:39 UTC |