Since Date::ICal is OO, the beginning is when you make an object
#!/usr/bin/perl -w
use Test::Simple tests => 2;
use Date::ICal;
my $ical = Date::ICal->new; # make an object
ok( defined $ical ); # check we got something
ok( $ical->isa('Date::ICal') ); # and it's the right class
and you get:
1..2
ok 1
ok 2
your first useful test.