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


in reply to one-liner hogs

I was always rather fond of perl -e 'fork() while 1'.

    --k.