xcommand | perl -nae 'print $F[0],"\n"'