Perl 端口扫描的脚本（SYN）

可能脚本会有Bug，我只是用来工做上用一下，具体有没有BUG没测。html 项目估计立刻结束了。 这个入库的是MYSQL的。原理是先Ping，若是通的话，则加入队列，mysql 经过队列再进行SYN探测。sql #!/usr/bin/perl use threads; use DBI; use Thread::Queue; use Thread::Semaphore; use Net::Ping;

>>阅读原文<<