Problem with muliple fork calls - PERL script

Hi All,

In my script, i am trying to call multiple fork call.

if i call less than 10 times, its working fine.

If i call more than 20 or 30 times, most of the process getting time out or died

foreach my $ttyport (@processTTY)
{
my $pid = fork();Inline Code Example Here
..............
..............
..............
}

Can somebody suggest the solution for this issue?