in reply to one-liner hogs

You could always eat all your file descriptors, not quite a one liner, but try running a web server at the same time as this little sucker. This is why clever persons use per process limitations.

#!/usr/bin/perl for (;;) { my $fh; eval {open($fh, "")}; last if $!; push @foo, $fh; } print "all out $!\n"; sleep(1000);