[PLUG] Perl 3D array - printing all values

Matt Alexander m at pdxlug.org
Wed Oct 22 13:33:02 UTC 2003


Paul Heinlein said:
> On Wed, 22 Oct 2003, Matt Alexander wrote:
>
>> I have a 3 dimensional array in Perl...
>>
>> $myarray[$val1][$val2][$val3]
>>
>> I would like to print every value in the array.
>
> foreach my $x ( @myarray ) {
>   foreach my $y ( @{$x} ) {
>     foreach my $z ( @{$y} ) {
>       print $myarray[$x][$y][$z], "\n";
>     }
>   }
> }

Eeeeeeeeenteresting...  Thanks Paul!




More information about the PLUG mailing list