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