[bcn-pm] Date, iCal, localtime

[Carles Pina i Estany]

Hola!

Tengo un problemilla con DateTime, Date, iCal y horas locales.

Parseo un fichero que contiene las horas con:
20060821T080000Z (en UTC)

y hago, simplificando la prueba, algo como:
--------------
#!/usr/bin/perl -w

use Date::ICal;
use DateTime;
use DateTime::TimeZone;


$date = Date::ICal->new(ical=>"20060821T080000Z");

$string = $date->ical(localtime=>1);
print "$string\n";

$string = $date->ical(offset=>"+0200");
print "$string\n";
--------------

Quiero pasarlo a localtime (si hago date:)
carlesapinux:~$ date
dg ago 20 10:45:44 CEST 2006
carlesapinux:~$ 

parece que está bien.

Pensé que con el primero pasandolo a localtime me iría bien, peor nada:
carlesapinux:~$ ./p.pl 
20060821T080000
20060821T100000
carlesapinux:~$ 

El segundo sí, pero entonces tendria que consultar para cada fecha el
offset respecto GMT... que lo tengo medio hecho pero no creo que sea el
camino, no?

Alguien me ilumina? :-)

Gracias!

-- 
Carles Pina i Estany		GPG id: 0x8CBDAE64
	http://pinux.info	Manresa - Barcelona