perl -pale '$_=$F[1]'

##</code><code>##

pcol() {
perl -pale "\$_=\$F[$1]" $2
}

##</code><code>##

pcol 1 list.file  # prints $F[1] (second column) from list.file

ls -lg | pcol 4  # prints byte counts of files in cwd