in reply to removing redundant entries
perl -nae'print if !$seen{ join " ", sort @F[0,1] }++' infile >outfile [download]