STDOUT/STDERR/EXITCODE

Здравейте,

Опитвам се да направя обращане до ОЦ-то и едновременно да имам СТДОУТ/СТДЕРР/и ЕКСИД_КОУД

пример -

$getdata=qx/$CommandFindGlobalValue/;

кадето $CommandFindGlobalValue = "cmd 2>&1"

Това ми враща СТДОУТ и СТДЕРР но не и exit_code.
Някой може ли да ме светне дали това е възможно. В момента просто правя > фаил и 4ета от фаила СТДОУТ/СТДЕРРОР а exit_code го полу4авам като използвам
system($CommandFindGlobalValue)

много благодаря предяарително

ДОКУМЕНТАЦИЯТА!!!!: perldoc perlvar | less -p CHILD_ERROR

$ cat true.pl
#!/usr/bin/perl

print "TRUE\n";
print STDERR "TRUE\n";
exit(0);

$ cat false.pl
#!/usr/bin/perl

print "FALSE\n";
print STDERR "FALSE\n";
exit(3);

$ cat testexitcode.pl
#!/usr/bin/perl

open (T, " ./true.pl 2>&1 |") || die "no truth";
open (F, " ./false.pl 2>&1 |") || die "no lies";

while (<T>) { print; }; close(T);
print $? >> 8, "\n";

while (<F>) { print; }; close(F);
print $? >> 8, "\n";

$ perl testexitcode.pl
TRUE
TRUE
0
FALSE
FALSE
3

RTFM!
--sdg

mnogo mersi!!!!

4esno da ti kaja baq se rovi4kah iz dokumentaciqta - no i tova si e maistorlak da znaesh kak da go otkriesh..

Изписани са поне 10 примера със swap на 0,1,2 - STDIN,STDOUT,STDERR:

[линк]

#~
$_->[/^(?>(.)?(.)+.*)(?!\1)(??{print(($1..$2)[9,0,15,7])})/]
#~

хубава страница - 'перлмонкс '

мерси