If you understand the concept behind a
Schwartzian Transform, the meat and potatos of this JAPH will wax trivial. Nevertheless, it was a fun exercise in triviality. ;)
$_="a2kvrlpntieoscatek eafhshjubrp mewlq rrxjacungohtd!";($x,$_)=/(
\D\S)([^Z]+)/x;print+(map{$$_[0]}sort{$$a[1]cmp$$b[1]}map{[split//]
}unpack$x x ord chop,$_),$/
Enjoy!
Dave
"If I had my life to live over again, I'd be a plumber." -- Albert Einstein