The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

#! perl -Ilib

use strict;

use SNCF::ICal;


my $s = SNCF::ICal->parse("t/sncf");

$s->print;