Array of hashes

[The Ghost]

How can I get the information out of the hashes?

sub somthing {
while (my $ref = $sth->fetchrow_hashref())   {

    foreach my $col (keys %{$ref}) {
             $results[$x]{$col}=$ref->{$col};
    }
    $x++;}
    return (@results); }

Then later:
(I don't understand this part)

 foreach my $result (@results) {
     foreach my $key (keys {$results[$x]}) {
       print "$key: $result{$key}\n";
    }    }


--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>