# Put fields in Array[counter] $Arrays[$counter] = split /\t/, $line; #### $Arrays[$counter] = [ split /\t/, $line ]; #### @{ $Arrays[$counter] } = split /\t/, $line;