tacitochaves · January 4, 2014 01:41
diff --git a/gistfile1.txt b/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";
 }
	#!/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";
	}