#!perl -lnaF// $"=',';map{$a=$_;$a=~s/$_//for@F;print if!$a&!$a{$_}++}glob"{@F}"x@F # 75 Zeichen