Sophie

Sophie

distrib > Mageia > 1 > i586 > by-pkgid > d92aa75c2d384ff9f513aed09a46f703 > files > 842

parrot-doc-3.1.0-2.mga1.i586.rpm

# Copyright (C) 2007-2009, Parrot Foundation.

=head1 Multi-Level Keys

Hashes and arrays can be combined in a number of ways to
make interesting and complex data structures. A hash may
contain an array PMC, which in turn can contain other arrays
or hashes. In these cases, the keys for each level can be
combined together to form a single unique key for a data
element in the structure.

This technique works equally well for arrays-of-arrays,
hashes-of-hashes, and combination structures as well.

=cut

.sub main :main

    .local pmc myhash, innerarray
    myhash  = new ['Hash']
    innerarray = new ['ResizableIntegerArray']

    $I0 = 2
    innerarray[2] = 42
    myhash["answer"] = innerarray

    $I0 = myhash["answer";$I0]        # $i = $hash{"answer"}[2]
    print $I0
    print "\n"

.end

# Local Variables:
#   mode: pir
#   fill-column: 100
# End:
# vim: expandtab shiftwidth=4 ft=pir: