从命令读取输出到Perl数组

前端之家收集整理的这篇文章主要介绍了从命令读取输出到Perl数组前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
@H_502_1@我想将命令的输出输入数组 – 如下所示:
my @output = `$cmd`;

但似乎命令的输出不会进入@output数组.

知道它去哪里了吗?

解决方法

这个简单的脚本适合我:
#!/usr/bin/env perl
use strict;
use warnings;

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

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

它产生了输出(三点之外):

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

命令的输出在行边界上分割(默认情况下,在列表上下文中). chomp删除数组元素中的换行符.

原文链接:https://www.f2er.com/Perl/172817.html

猜你在找的Perl相关文章