Select Code to Download

# a hash holding a reference to the array
my %hash;
...
# now try to access without intermediate $h_aref
#print 'array length is ' . scalar(@$hash{'aref'}) . "\n";   # error
#print 'array length is ' . scalar(@$$hash{'aref'}) . "\n";  # error

my %hash;
print '$aref is ' . $aref ."\n";
...
print 'after 3rd push [1] array value is [' . $hash{'aref'}[1] . "]\n"
+;
print 'after 3rd push [2] array value is [' . $hash{'aref'}[2] . "]\n"
+;