Help for this page

Select Code to Download


  1. or download this
    package XYZ;
    
    ...
      my $self = shift;
      print $self->[ HASH1 ]{ something }, $self->[ HASH2 ]{ something_els
    +e };
    }
    
  2. or download this
    package XYZ;
    
    ...
      my( $hash1Ref, $hash2Ref ) = @instances{ $self }{ hash1, hash2 };
      print $hashRef1->{ something }, $hashRef2->{ something_else };
    }