Select Code to Download

my %foo : Field;  # no accessor 
our %foo : Field; # accessor created automatically

use Test::More tests => 3;
use strict;
...
    is( Foo->Num_objects, 1, '1 object' );
};
is( Foo->Num_objects, 0, '0 objects' );

1..3                                                                  
+          
ok 1 - 2 objects                                                      
+          
ok 2 - 1 object                                                       
+          
ok 3 - 0 objects