1,105,447 Community Members

Problem with muliple fork calls - PERL script

Member Avatar
cacofonix
Newbie Poster
7 posts since Nov 2011
Reputation Points: 0 [?]
Q&As Helped to Solve: 0 [?]
Skill Endorsements: 0 [?]
 
0
 

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?

`

Member Avatar
coding101
Junior Poster in Training
77 posts since Apr 2010
Reputation Points: 0 [?]
Q&As Helped to Solve: 0 [?]
Skill Endorsements: 0 [?]
 
0
 

consider this fragment:
Youll see that the $ttyport is not a global variable,
each fork call gets its own copy, so its gonna loop more than
expected.

#!/usr/bin/perl

use POSIX;


for($i = 0; $i < 10; $i++){

  $pid = fork();
  if($pid){

   $ppid = getppid();
   print "$ppid\n" unless $ppid == 1;
  }


}
You
This article has been dead for over three months: Start a new discussion instead
Post:
Start New Discussion
View similar articles that have also been tagged: