Help for this page

Select Code to Download

Select or download this

my %h = (1, 2);
print bless(\%h), $/;
...
__END__
main=HASH(0x99ae63c)
main=HASH(0x99ae63c)

Select or download this

for $val (@variables) {
   my %temp;
...

   push @array, \%temp;
}