perl -nle 'print ((split)[4])' infile > outfile