#how to print one by one continuously in full array my $counter = 0; foreach my $array (@stuff){ print "ARRAY [ ", $counter++ ," ]: "; foreach my $data (@$array){ print $data,' '; } print $/; } #OR print join " ", map{@$_} @stuff[0..$#stuff];