Perl 端口扫描入库的问题

坑爹的是不知道怎么报错。。头疼。。html #!/usr/bin/perl use strict; use DBI; use Net::Ping; my @oder=(); my $in=DBI->connect("DBI:mysql:database=port_scan;host=localhost","root","") or die "NO :

>>阅读原文<<