$line =~ s/\t+/\t/g;