-nE@_[ord]=$_,for/./g;@_=!say@_