如何將system結(jié)果輸出到一個變量？

屠龍

例如將

   

system(“/bin/ps ax \| grep \"perl5.12.2\" \| grep -v grep \| awk \'\{print \$7\}\' | wc -l”)

輸出到一個變量

Perlvim

my $var = system("shell cmd");

cu_little_bird

1. $a=`/bin/ps ax \| grep \"perl5.12.2\" \| grep -v grep \| awk \'\{print \$7\}\' | wc -l`

復(fù)制代碼

gaoyang636

1. @return=readpipe("COMMANDS") or die (ERROR!$?)

復(fù)制代碼

PfanAya

cu_little_bird 發(fā)表于 2011-11-22 23:06

對嗎？
The return value is the exit status of the program as returned by the wait call.
system返回值是退出狀態(tài)。

PfanAya

對嗎？
The return value is the exit status of the program as returned by the wait call.
sy ...
PfanAya 發(fā)表于 2011-11-24 08:52

謝謝 又長見識了

1. my $result = readpipe("ls -l");
   
2. print $result;
   

復(fù)制代碼

屠龍

解決了，謝謝樓上各位大俠！