my $ical = Date::ICal->new( ical => '19971024T120000',
                            offset => "-0800");