My one word of advice would be to

Ditch those comments.

Seriously. They distract from understanding the code. They will slowly drift out of sync. If you need to comment what purpose a variable serves, you have named it poorly.

--

g r i n d e r
print@_{sort keys %_},$/if%_=split//,'= & *a?b:e\f/h^h!j+n,o@o;r$s-t%t#u';