指定したフィールドの追加/削除を調べる

　元ファイルの指定したフィールドの内容について、引数のファイルの同じフィールドと比較し、新たに追加された分と削除された分を出力する。

# diff_field
BEGIN{
        FS="\t" # 区切り記号
        Fn=1 # 比較するフィールド
        File = "比較元のファイル名"
        while((getline < File)!=0) F[$Fn]=$Fn
        close (File)
}
{
        G[$Fn]=$Fn
        if (F[$Fn]=="") {       # add
                print "add " $Fn
        }
}
END{
        for (i in F) {
                if (G[i]=="") { #delete
                        print "del " i
                }
        }
}