Just recently, Parallel::ForkManager was reviewed here. Its pod includes a snippet for doing just what you want.

After Compline,
Zaxo