print $out_fh $_ =~ y/\t/\t/rs;