Select Code to Download

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

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

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

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