http://www.perlmonks.org?node_id=61261


in reply to Re: one-liner hogs
in thread one-liner hogs

My humble contribution: while (++$i) { $foo{$i}=[ @foo ]; $foo[$i]=[ %foo, $i ]; } bounces back and forth making new arrays of ever-increasing size. Allocated about 350MB in about 30 secs. Uses a lot of processor, though.

Agreed. Quite fun deliberately pessimizing code.