Of course that is obfuscation... and it's neat and clean...

I thought it funny that a ( suposed :-) comment is used in the code...

I could have said this though... if you like... is it good enough for you?

%_=(Just=>q=%20==>another=>q=%20==>Perl=>q=%20==>Hacker=>q=%0A==>)=>
print map{$_->[2]=~s=[^->]?(.[^->])=chr(hex($1))=e;$_->[0]=>$_->[2]} 
sort{$b->[1]cmp$a->[1]}map{[$_=>m=[^->]+([aeiou])==>$_{$_}]}keys %_;

Did I mention that I always do my 'one liners' under strict and -w

I belive that good practices should go through every code you write... but that's another thread.

--
Casey