perlquestion
sdetweil
I have this multi-platform application. it launches children that run for a short period of time.
<br><br>
I need to communicate from parent to child.
<br><br>
so just before launching the child, I do <br>
$ENV{'varname'}='value';
<br><br>
and in the child, I get the environment variable and all is well.
<br><br>
this works on Windows without problem,
but the variable does not show up for the linux child.
in both cases I am actually starting a command shell script.
xxx.cmd on Windows and xxx.sh on linux.
the set command dumps the environment, and on linux the variable is not set when xxx.sh is started.
<br><br>
I do not need the value to be persistent, and I understand the reasons and issues there.
<br><br>
one piece of info, the child is started with OPEN so that the parent can monitor the childs console output
<code>
if($environmentDetails->GetValue() eq "Yes"){
$ENV{'SKIP_SYSTEM'}='0';
}
else{
$ENV{'SKIP_SYSTEM'}='1';
}
# have to execute the shell script from the current folder..
# *ix is picky, you must be explicit
open(CMD, ( ($^O eq 'MSWin32' ) ? "":"./")."$command 2>&1 |");
while(<CMD>){
$detailsInfo->AppendText($_);
}
</code>
on perl 5.10, linux fedora 10, 32 bit (can't update for other reasons)