I have recently been having alot of computer related problems, and I don't really know how secure my computer is. It came to me that I might be able to test this via Perl. Is there an easy way I can do a self scan of my ports (without using some other program that would possibly contain a virus), and print out the results to the screen (if it *might* be a security risk)? Even with a firewall up, I still have some suspicious activity here (yes, half of that is because of being on Windows, but oh well =P). Anyway, if anyone can help, I would appreciate it.