@columns = split(/\t/, $line);