PERL: 获取system输出

1.使用重定位的方法,比如:

system "path >> d://path.txt";

然后再对临时文件 path.txt 处理

 

2.使用 `  (这个是tab上面的`)

就是这个东东,弄了好久才搞明白...一定是 TAB 上面的 ` 不是 ~,也不是单引号'

my $path = `path`;
print $path;

 

3.使用qx//

//是分隔符,也可以用其他符号代替,比如!,[],()

my $path = qx/path/;
print $path;