Help for this page

Select Code to Download


  1. or download this
        #!/usr/bin/perl -w
                                                                          
    +                           
    ...
        is( $ical->month,   10,       '  month()' );
        is( $ical->year,    1964,     '  year()'  );
    
  2. or download this
    1..8
    ok 1 - new() returned something
    ...
    ok 7 -   month()
    ok 8 -   year()
    # Looks like you failed 2 tests of 8.