"Doctor, it hurts when I do this!"

"Then don't do that."

So the answer is simple - don't write perl programs that consume more memory than your system can allocate.

s**lil*;  $*=join'',sort split q**;  s;.*;grr; &&s+(.(.)).+$2$1+; $; =
qq-$_-;s,.*,ahc,;$,.=chop for split q,,,reverse;print for($,,$;,$*,$/)
[download]