Select Code to Download

package XYZ;

...
  my $self = shift;
  print $self->[ HASH1 ]{ something }, $self->[ HASH2 ]{ something_els
+e };
}

package XYZ;

...
  my( $hash1Ref, $hash2Ref ) = @instances{ $self }{ hash1, hash2 };
  print $hashRef1->{ something }, $hashRef2->{ something_else };
}