#!/bin/rc


for(i in $*) {
	if ( ~ $i -d ) {
		shift
		del='-F'$1
		shift
	}
	if ( ~ $i -f ) {
		shift
		col=$1
		shift
	}
}

awk  $del  '{print $'$col' }'