Jak przechwycić STDOUT i STDERR w dwóch różnych zmiennych przy użyciu linków w Perlu

Question

Powiedzmy, że chcę uruchomić zewnętrzny program z mojego skryptu z backtickami i jednocześnie chcę uchwycić zarówno STDOUT, jak i STDERR, ale w dwóch różnych zmiennych . Jak mogę to zrobić? Dla istance jeśli uruchomić ten skrypt ...

my $cmd = `snmpwalk -v $version -c $community $hostname $oid`; 

... jeśli nie ma błędu wszystko działa dobrze, ale jeśli polecenie zgłosi błąd ten błąd będzie drukowany w wierszu polecenia, a ja nie chcesz, żeby tak się stało. Chcę również uchwycić błąd. Nic nie musi być drukowane na ekranie. Jakieś pomysły?

Answer 1

W Perl FAQ masz różne opcje w zależności jak chcesz kontynuować:

http://perldoc.perl.org/perlfaq8.html#How-can-I-capture-STDERR-from-an-external-command%3f

Answer 2

Jedynym sposobem, aby to zrobić z backticks jest przekierowanie do pliku wewnątrz polecenia powłoki:

my $cmd = `snmpwalk -v $version -c $community $hostname $oid 2>error.dat`; 

Jeśli chcesz uchwycić STDERR wewnątrz skryptu, trzeba IPC::Open3 zamiast backticks

Answer 3

IO::CaptureOutput

to bardzo wygodne opakowanie do tego, co chcesz zrobić.

Answer 4

Nie musisz przechodzić aż do open3, którego IIRC jest tylko wtedy, gdy musisz czytać i pisać do zewnętrznego polecenia, a nawet wtedy są inne metody.

Dla twojego problemu sugeruję użycie Capture::Tiny, który może przechwycić (lub nawet trójkę) STDOUT i STDERR z dowolnego działania wewnątrz jego bloku. Na przykład, na zapytanie:

#!/usr/bin/env perl 

use strict; 
use warnings; 

use Capture::Tiny qw/capture/; 

... 

my ($stdout, $stderr) = capture { 
    system ("snmpwalk -v $version -c $community $hostname $oid"); 
}; 

Inny przykład rozważyć ten kod funkcjonującej:

#!/usr/bin/env perl 

use strict; 
use warnings; 

use Capture::Tiny qw/capture/; 

my ($stdout, $stderr) = capture { 
    system ("echo 'hello'"); 
    system ("date"); 
    warn "Arg1!"; 
}; 

print "STDOUT:\n$stdout"; 
print "STDERR:\n$stderr"; 

który po prostu dał mi:

STDOUT: 
hello 
Mon Dec 19 23:59:06 CST 2011 
STDERR: 
Arg1! at ./test.pl line 11.