Now, I know this code will not work:

$founddata[0]{'name'}='Chris';
$founddata[0]{'age'}='27';
$founddata[1]{'name'}='Fred';
$founddata[1]{'age'}='Fred';

$cnt=0;

    foreach $key (keys %founddata[$cnt]){
        print "$founddata[$cnt]{$key}\n\n";
        }
    $cnt++;
    }

But I need to do the same with legitimate code, anyone know how?

Thanks in advance!

Chris Denman

Re: multi-dimensional arrays with hashes help

Chris> Now, I know this code will not work:
Chris> $founddata[0]{'name'}='Chris';
Chris> $founddata[0]{'age'}='27';
Chris> $founddata[1]{'name'}='Fred';
Chris> $founddata[1]{'age'}='Fred';

$founddata{0}{name} = ...

and so on.

Then you can double walk the hash keys.

    foreach $index ( keys %founddata ) {
        foreach $attr ( keys %{$founddata{$index}} ) {
            print "$index $attr $founddata{$index}{$attr}\n";
        }
    }

hth
tony
--
Tony Curtis, Systems Manager, VCPC,    | Tel +43 1 310 93 96 - 12; Fax - 13
Liechtensteinstrasse 22, A-1090 Wien.  | <URI:http://www.vcpc.univie.ac.at/>
"You see? You see? Your stupid minds!  | private email:

Only one minor change... :)

     foreach $key (keys %{$founddata[$cnt]}){

Fixes it.

Lee.

--
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
Lee Benfield, Ford Motor Co.

I would suggest an array of hash-references in your case. Consider the
following code:

/whichever/path/perl -w
use strict;

hash

# and so on.....

    foreach $key (keys %$one) {
        print "$key : $one->{$key}\n\n";
    }

HTH
-Partha

Isn't that what the original poster had?