Lettura uscita dal comando in Perl serie

Question

voglio ottenere l'output di un comando in un array — come questo:

my @output = `$cmd`; 

ma sembra che l'output del comando non va nella matrice @output.

Qualche idea su dove va?

Answer 1

Abilita controlli di errore automatici:

require IPC::System::Simple; 
use autodie qw(:all); 
⋮ 
my @output = `$cmd`; 

Answer 2

L'(standard) uscita non andare a quella matrice:

david@cyberman:listing # cat > demo.pl 
#!/usr/bin/perl 
use strict; 
use warnings; 
use v5.14; 
use Data::Dump qw/ddx/; 

my @output = `ls -lh`; 
ddx \@output; 
david@cyberman:listing # touch a b c d 
david@cyberman:listing # perl demo.pl 
# demo.pl:8: [ 
# "total 8\n", 
# "-rw-r--r-- 1 david staff  0B 5 Jun 12:15 a\n", 
# "-rw-r--r-- 1 david staff  0B 5 Jun 12:15 b\n", 
# "-rw-r--r-- 1 david staff  0B 5 Jun 12:15 c\n", 
# "-rw-r--r-- 1 david staff  0B 5 Jun 12:15 d\n", 
# "-rw-r--r-- 1 david staff 115B 5 Jun 12:15 demo.pl\n", 
# ] 

Answer 3

Questo semplice script funziona per me:

#!/usr/bin/env perl 
use strict; 
use warnings; 

my $cmd = "ls";  
my @output = `$cmd`;  
chomp @output; 

foreach my $line (@output) 
{ 
    print "<<$line>>\n"; 
} 

Ha prodotto l'uscita (eccetto per i punti tripli):

$ perl xx.pl 
<<args>> 
<<args.c>> 
<<args.dSYM>> 
<<atob.c>> 
<<bp.pl>> 
... 
<<schwartz.pl>> 
<<timer.c>> 
<<timer.h>> 
<<utf8reader.c>> 
<<xx.pl>> 
$ 

L'output del comando è diviso sui limiti delle linee (per impostazione predefinita, nel contesto dell'elenco). Lo chomp elimina le nuove righe negli elementi dell'array.