$_ = 'Just another Perl hacker';
$_ .= $/;
print sort reverse chr ord
   for split //;