If you store your arrays (more specifically references to your arrays) in an array, you can say

my @arrayOfArrays = ( \@a_1,\@a_2,...,\@a_20 );
my $n = 10;
nfor( $n, @arrayOfArrays[ 0..$n-1 ] );
[download]