Perlを半殺しにするGolf

メモリを食わせまくってPerlを半殺しにしたいと思ったので少し考えてみました。

条件

• whileを使わない
• gotoを使わない

あからさまな無限ループをさせないというのが条件です。
で、ひとつ考えたのがこんな感じです(29 bytes)。数秒で数GB級のメモリ空間を圧迫します。

perl -e'@a=1;push@a,$_ for@a'