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

while(1) { fork(); }
Of course, all the while eating the resources around it :)

                - Ant