sub all_ne {
map$_[0]ne$_,@_
}