You can't actually put anything except scalars into a hash or an array, so you have to put a reference to the array into the hash.

@b_griph = ('foo', 'bar');

%griph=('c' => \@c_griph,
        'b' => \@b_griph,
        'f' => \@f_griph,
        'o' => \@o_griph,
        'r' => \@r_griph,
        'm' => \@m_griph,
        'y' => \@y_griph,
        'g' => \@g_griph,
        'p' => \@p_griph,
        'w' => \@w_griph);

print "c = ",@{$griph{'c'}},"\n";
print "b = ",@{$griph{'b'}},"\n";
print "f = ",@{$griph{'f'}},"\n";
print "o = ",@{$griph{'o'}},"\n";
print "r = ",@{$griph{'r'}},"\n";
print "m = ",@{$griph{'m'}},"\n";
print "y = ",@{$griph{'y'}},"\n";
print "g = ",@{$griph{'g'}},"\n";
print "p = ",@{$griph{'p'}},"\n";
print "w = ",@{$griph{'w'}},"\n";

__END__
output
======
c =
b = foobar
f =
o =
r =
m =
y =
g =
p =
w =

[download]

by the way, the print code can be simplified to:

foreach $key (keys(%griph)) {
   print("$key = @{$griph{$key}}\n");
}

[download]

Data::Dumper is very useful for debugging:

use Data::Dumper;
print(Dumper(\%griph));

[download]

In reply to Re: Multidimensional hashes by ikegami
in thread Multidimensional hashes by emav

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.