前端之家收集整理的这篇文章主要介绍了
如何在Perl中获取外部命令的输出？，
前端之家小编觉得挺不错的，现在分享给大家，也给大家做个参考。
我想将Windows命令行程序(比如说powercfg -l)的
输出写入使用Perl创建的
文件，然后在for循环中逐行读取
文件并将其分配给一个字符串。
my $output = qx(powercfg -l);
## You've got your output loaded into the $output variable.
## Still want to write it to a file?
open my $OUTPUT,'>','output.txt' or die "Couldn't open output.txt: $!\n";
print $OUTPUT $output;
close $OUTPUT
## Now you can loop through each line and
## parse the $line variable to extract the info you are looking for.
foreach my $line (split /[\r\n]+/,$output) {
## Regular expression magic to grab what you want
}
原文链接：https://www.f2er.com/Perl/173035.html
