commandline session $cat test3.pl #!/usr/bin/perl -w use Test::Simple tests => 2; use Date::ICal; my $ical = Date::ICal->new; # create an object ok( defined $ical ); # check that we got something ok( $ical->isa(‘Date::ICal’) ); # and it’s the right class $perl test3.pl 1..2 ok 1 ok 2 $