# Print out the whole AoA contents foreach my $arrayref (@strings) { print "$_\n" foreach @$arrayref; } print "----\n\n"; # Or just the contents of one group foreach my $item (@{$strings[0]}) { print "$item\n"; } __DATA__ aaa bbb ccc-ddd eee fff-ggg hhh iii-jjj kkk lll- __OUTPUT__ aaa bbb ccc ddd eee fff ggg hhh iii jjj kkk lll ---- aaa bbb ccc