Looping through elements of an anonymous array

[eric-perl]

Hello, All:

I have an unusual question: If I have an anonymous array stored in a hash, 
is there a more graceful way of iterating through each item in the 
anonymous array than using a counter? i.e.,

@all_records{q} = [1, 2, 3]
$j = 0;
while ($all_records{q}->[$j]) {
        print $all_records{$i}->[$j];
        $j++;
}

-- 
Eric P.
Los Gatos, CA


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]