请教：在Perl里调用系统命令时，如何关闭系统命令的打印输出？

detective0922

大家好，请教大家一个问题，在Perl里调用系统命令时，如何关闭系统命令的打印输出？
比如：
        foreach $b (1..250){
                $ip="192.9.".$a.".".$b;
                system "ping -n 1 $ip";
        }
        print "192.9.".$a."0-250 is ok";
运行这个的时候，会打印出很多ping命令本身的返回信息，如：
Reply from 192.9.15.1: bytes=32 time<1ms TTL=128

Ping statistics for 192.9.15.1:
    Packets: Sent = 1, Received = 1, Lost = 0 (0% loss),
Approximate round trip times in milli-seconds:
    Minimum = 0ms, Maximum = 0ms, Average = 0ms

但我不想看到这些，不知道有没有办法关闭它？
在Solaris上比较方便，直接>/dev/null就行，但windows上不知道怎么处理，所以请教下大家，谢谢大家先~

iakuf

你下次可以发到 shell 区去。。。。。你直接 &> /dev/null 给 shell 的标准输出和标准错误都重定向到 null 就好了

detective0922

shell我知道，我需要的是windows下的。不过已经知道了，windows下也可以>null
谢谢楼上的，呵呵~

scrit

回复 3# detective0922


    具体咋实现的啊，我也需要解决这个问题

cecial

回复 4# scrit


    应该是把system里面的“ping -n 1 $ip” 改成 “ping -n 1 $ip &> null”。
或者把system("ping -n 1 $ip"); 改成`ping -n 1 $ip`;

ttcn_cu

unix 下的 /dev/null = win 下的 NUL

heut2009

使用 $tmpvar=`you cmd`
这样输出被赋给变量了