$|=$_="1jrucsita zavntogtrhoearc tdlujmubv fhuamczk6eprs",map{print"\0",chop;select$,,$,,$,,9/ord}m{..}g;