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