Один из лучших сканеров портов написан на перл а точнее nmap
Я бы на вашем месте посмотрел его исходники.