for (@data) { push(@{$arrays}, [split(/ /,$data[$a])]); $a++; } #### foreach (@arrays) and foreach (@arrays[0])