Select Code to Download

@AoH =
(
        { name => Adam, age => 0 },
...
@age_ref = (\$AoH[0]{age},\$AoH[2]{age});
print "\${\$age_ref[1]} = ${$age_ref[1]} =  $AoH[2]{age}\n";
# prints ${$age_ref[1]} = 20 =  20