in reply to How to call two programs simultaneously from a running program

use threads;
use threads::shared;
...
my $Bresults:shared;
async {
    $Bresults = `perl B.pl`;
}->detach;

my $Cresults = `perl C.pl`;

## Do something with the results;

[download]
Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.
"Science is about questioning the status quo. Questioning authority".
In the absence of evidence, opinion is indistinguishable from prejudice.
"Too many [] have been sedated by an oppressive environment of political correctness and risk aversion."
  • Comment on Re: How to call two programs simultaneously from a running program
  • Download Code

Replies are listed 'Best First'.
Re^2: How to call two programs simultaneously from a running program
by ccmbvipin (Initiate) on Sep 19, 2008 at 04:35 UTC
    Hi, thanks for useful suggestion I also need to call program D, but not untill both B and C have been executed. Please guide.
[reply]

      use threads;
use threads::shared;
...
my $Bresults:shared;
async {
    $Bresults = `perl B.pl`;
}->detach;

my $Cresults = `perl C.pl`;

sleep 1 until defined $Bresults;

my $Dresults = `perl D.pl $Bresults $Cresults`;

      [download]
      Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.
      "Science is about questioning the status quo. Questioning authority".
      In the absence of evidence, opinion is indistinguishable from prejudice.
[reply]
[d/l]

In Section Seekers of Perl Wisdom