perl -n -e'print join(" ", (split(/\s+/))[0,1]), "\n"' yourfile.txt