Select Code to Download

use strict;
use warnings;
...
print "rc='$rc'\n";
print "stdout='$outstr'\n";
print "stderr='$errstr'\n";

started exe:C:\Strawberry\perl\bin\perl.exe (cmd:perl -e "print q{hell
+o stdout}; print STDERR q{hello stderr}") ok, pid=3132.
rc='0'
stdout='hello stdout'
stderr='hello stderr'

# Test program tt1.pl

...

run_cmd_noshell($^X, $^X, '-le', 'print q{hello one};');
run_cmd_noshell($^X, 'perl', '-le', 'print q{hello two}; exit 42;');

run 'C:\Strawberry\perl\bin\perl.exe' with args:
    'C:\Strawberry\perl\bin\perl.exe -le print q{hello one};'
...
    'perl -le print q{hello two}; exit 42;'
hello two
error: exit code=42