Help for this page

Select Code to Download


  1. or download this
    my %foo : Field;  # no accessor 
    our %foo : Field; # accessor created automatically
    
  2. or download this
    use Test::More tests => 3;
    use strict;
    ...
        is( Foo->Num_objects, 1, '1 object' );
    };
    is( Foo->Num_objects, 0, '0 objects' );
    
  3. or download this
    1..3                                                                  
    +          
    ok 1 - 2 objects                                                      
    +          
    ok 2 - 1 object                                                       
    +          
    ok 3 - 0 objects