摘要：
先说下当时的需求，而且思路：1.需求：需要扫描多个IP，把扫描结果保存到XML下。将XML下数据进行过滤，取出需要的数据打印出来。2.目前难点：根据场景的不同，扫描出来的结果差异无比的大，例如每次结果都有差距。偶尔会冒出一些不懂的字段。为此很伤脑筋。3.自己写出来的Perl代码：自己写的代码有点烂，可能学得不太好。Perl能够读取XML的节点，但是一旦扫多个IP，节点就会有变化。当时使用的模块有很多问题，对此无比的尴尬。一开始摸索的模块是这个：XML::Simple 这是一个ＸＭＬ专门的处理模块。贴上刚开始写的代码: #!/usr/bin/perl use XML::Simple;... 阅读全文
摘要：
在老外网上找到的。这个脚本真的是及时雨，解决了我的一些难题。#!/usr/bin/perl# Created by Paul Haas: phaas <AT> redspin <DOT> com# Licensed under a NMAP Compatible License (GNU GPL v2)# Dual licensed under the Fyodor may-use-as-he-pleases licenseuse Nmap::Parser;use Socket; # For inet_atonuse DBI;use strict;use vars qw 阅读全文