(I'd suggest that you keep posting to this thread as long as you're working on the same problem, unless people stop responding to it.)

Ok, let's say you want to create a hash of two-element arrays, with the hash keys being the Italian numbers, each one pointing to a reference to a two-element array holding the Spanish and French numbers, in that order. Then as you're going through the first loop (Italian = Spanish), you need to insert the Spanish numbers as the first element of an array rather than a simple value:

$hash{$italian} = [ $spanish ];

The square brackets return a reference to an array, which is a scalar that can be stored as a value in the hash. So now it looks like this, with references to one-element arrays as the values:

$hash = ( uno => [ 'uno' ],
          due => [ 'dos' ],
          # and so on
         );

[download]

Then in the second loop, you need to add the French numbers to the arrays corresponding to their matching Italian hash keys. There are two ways you could do this:

# by assigning directly to the second element of the sub-array
$hash{$italian}[1] = $french;

# or by dereferencing the sub-array pointed to by the hash value
# and pushing the new value onto the end of that array
push @{$hash{$italian}}, $french;

# Either way, you'll end up with:
$hash = ( uno => [ 'uno','un' ],
          due => [ 'dos','deux' ],
          # and so on
         );

[download]

Then when you're ready to print them out, you loop through the keys of the hash, printing the key and the elements of the sub-array as you wish:

for my $key (keys %hash){
  print $key, ' => ', join ' , ', @{$hash{$key}}; # dereference sub-ar
+ray
  print "\n";
}

[download]

The trick is keeping track of what level of the structure you're dealing with, and getting the sigils (and arrows, if necessary) right for pointing to the right things, whether values or references.

Aaron B.
Available for small or large Perl jobs and *nix system administration; see my home node.

In reply to Re^3: Need advice on checking two hashes values and keys by aaron_baugher
in thread Need advice on checking two hashes values and keys by perlynewby

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.