-> more bug*
::::::::::::::
bugSTDOUT.pl
::::::::::::::
#!/usr/bin/perl
print STDOUT "Running bugSTDOUTb.pl with backticks\n";
print STDOUT "stdout from bugSTDOUTb.pl=" . `bugSTDOUTb.pl` . "\n";
::::::::::::::
bugSTDOUTb.pl
::::::::::::::
#!/usr/bin/perl
print STDOUT "Running bugSTDOUTc.pl with system()\n";
system('bugSTDOUTc.pl');
print STDOUT "$0 done\n";
::::::::::::::
bugSTDOUTc.pl
::::::::::::::
#!/usr/bin/perl
print STDOUT "Hello world!\n";
####
-> bugSTDOUT.pl
Running bugSTDOUTb.pl with backticks
stdout from bugSTDOUTb.pl=Running bugSTDOUTc.pl with system()
Hello world!
/u/geaaron/bin/bugSTDOUTb.pl done
####
D:\My\Tools>bugSTDOUT.pl
Running bugSTDOUTb.pl with backticks
stdout from bugSTDOUTb.pl=Running bugSTDOUTc.pl with system()
D:\My\Tools\bugSTDOUTb.pl done