Windows2kだと死なない
>perl -e "while (1) { fork; }"
The Unsupported function fork function is unimplemented at -e line 1.

とても安全だ