Beloved Monks,

In this code I'm trying to get an array of references to point at elements of an array of hashes.
@AoH =
(
        { name => Adam, age => 0 },
        { name => Bob,  age => 10 },
        { name => Cat,  age => 20 }
);

# Trying something simple first (2 scalars on the left of the assignme
+nt)
($age_ref0,$age_ref2) = (\$AoH[0]{age},\$AoH[2]{age});
print "\$\$age_ref0 = $$age_ref0\n";  # Prints '$$age_ref0 = 0'
print "\$\$age_ref2 = $$age_ref2\n";  # Prints '$$age_ref2 = 20'
$$age_ref2 = 21;
print "\$\$age_ref2 = $$age_ref2 = $AoH[2]{age}\n";
# The above prints '$$age_ref2 = 21 = 21'

# The above went to plan, so but let's try to do similarly using an ar
+ray on the left of the assignment
@age_ref = (\$AoH[0]{age},\$AoH[2]{age});
print "\$\$age_ref[1] = $$age_ref[1] = @$age_ref[1] = $AoH[2]{age}\n";
# The above prints '$$age_ref[1] =  =  = 21'.  Why???
print Dumper(\@age_ref);   # (Essentially) prints: '\0, \21'

[download]
What am I doing wrong, please?

Thanks.
tel2

In reply to Put references to array of hash elements in an array by tel2

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.