Help for this page

Select Code to Download


  1. or download this
    #! /usr/bin/perl
    
    ...
    my %foo : Field;
    print "about to call ATTR with \\%bar\n";
    my %bar : Field;
    
  2. or download this
    about to call ATTR with \%foo
    $VAR1 = {
    ...
              '%just_to_prove_we_are_in_the_right_scope' => {},
              '%foo' => {}
            };