這是課堂上練習的程式,可以掃瞄某主機哪些 Port 有開放。 利用 Perl::Socket 建立 socket 後 connent() 主機,如果回應 true 表示連線正確 (Port 有開啟)。 使用方法: portscan.pl #!/usr/bin/perl use strict; use Socket; my $host = shift; print "Enter scan ...
blog.linym.net