Re: Loop through hash structure

[nvivek]

You can use the following code for getting the values of hash.

for my $record ( $hash{'Application'}) {
print "Environment:".$record->{'Environment'}[0]->{'Name'} ."\n";
print "Region:".$record->{'Environment'}[0]->{'Region'}[0]->{'Name'}."
+\n";
print "Idrive:".$record->{'Environment'}[0]->{'Region'}[0]->{'Idrive'}
+."\n";
print "LPad:".$record->{'Environment'}[0]->{'Region'}[0]->{'Zdrive'}."
+\n";
}

For your reference, I have used the index as 0.You can find the length of the array in the hash and you can loop through the array length.

[PerlScholar]

Hi Nvivek,

This looks like what I need, however I would like to loop through all the indexes not just 0 or 1 is there a way to do that? Taking out the index number gives the error. Thanks!

Pseudo-hashes are deprecated at Z:/My Documents/Workspace/Script.pl line 12.
Argument "\x{51}\x{41}" isn't numeric in hash element at Z:/My Documents/Workspace/Script.pl line 12.
Bad index while coercing array into hash at Z:/My Documents/Workspace/Script.pl line 12.

[Corion]

See References Quick Reference, and maybe perlreftut.

[PerlScholar]

Hi Corion, had a look at those 2 documents and tried a few things but still no breakthrough. I can only seem to access the array values when I include the index as above. Is there any simple way of looping through or am I using a poor structure or something? Thanks!