in reply to Re^2: Looping backwards through two arrays at once?
in thread Looping backwards through two arrays at once?

for my $offset ( 0 .. $#ary_a ) {
    foobar( $ary_a[ -$offset ], $ary_b[ -$offset ] );
}

[download]

This is the reply I was going to give but you're suffering from an off-by-one error. It should be: 

for my $offset (1..@ary_a) {
    foobar( $ary_a[ -$offset ], $ary_b[ -$offset ] );
}

[download]

duff

In Section Seekers of Perl Wisdom