in reply to pg 246 of programming perl
Or even:
print "$$hashrefA{Adam}\n"; [download]
use strict; my $hashrefA = { 'Adam' =>'Eve', 'Clyde'=>'bonnie', 'Antony' =>'Cleo' . 'patra' }; print "$$hashrefA{Adam}\n"; __END__ Eve [download]