array of array

gistfile1.txt

#!/home/chaves/perl5/perlbrew/perls/perl-5.16.3/bin/perl
 

use 5.12.0;
 
my @AoB = (
	[ 'a1', 'b1', 'c1' ],
	[ 'a2', 'b2', 'c2' ],
	);

foreach ( my $i; $i <= $#AoB; $i++ ) { 
	print "@{$AoB[$i]}\n";
}