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 :

>>阅读原文<<