in reply to using split on every element in an array

Hi,

while(<fname>){ chomp; @data = split(/\\t/); print "[$_]\n"; map{print "[$_]\n"}@data; }