-nE'@_=();@_[ord]=$_ for/./g;say@_'