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