perl -lape '$_ = join "\t", @F[0,1,3,4]' file > newfile