awk '$1 ~ /^F/ { print $0 }' /tmp/frhtest/ADDC.bak > /tmp/frhtest/ADDC.$date perl -ane 'print if $F[0] =~ /^F/' /tmp/frhtest/ADDC.bak > /tmp/frhtest/ADDC.$date