查找输入内容,并格式化输出的问题.

gonglifeng

#!/usr/bin/perl
use strict;
die "Usage: $0 Network(example:192.168.0.0/24)\n" unless @ARGV;
my $CMD = "nmap  -n -sP $ARGV[0]";
open(MAC,"$CMD |") || die "Can't get pipe to nmap: $!\n";

while (<MAC>) {
        printf ("\t%s \t%s\n",$1,$2) if /MAC Address: ([\dA-F\:]+) (\(.*\))/ ;
        printf ("\n%s",$1) if /Running: ([\d\.]+)/ ;
}
close(MAC);

上面的程序是使用nmap, 输出MAC和Running, MAC可以输出, Running就不行了,为什么啊?

aku1

楼主，我的output,怎么和你写的完全不一样。
perl]$ nmap  -n -sP 192.168.122.0/24

Starting Nmap 5.51 ( http://nmap.org ) at 2014-12-31 14:41 CST
Nmap scan report for 192.168.122.1
Host is up (0.00040s latency).
Nmap scan report for 192.168.122.10
Host is up (0.00041s latency).
Nmap scan report for 192.168.122.11
Host is up (0.0032s latency).
Nmap scan report for 192.168.122.15
Host is up (0.067s latency).
Nmap done: 256 IP addresses (4 hosts up) scanned in 3.33 seconds