Port scanners are an area that I am not very familiar with. The code looks clean if rather simplistic. I'm not particularly worried about the threats it might pose to my computer.

It could be argued that providing links to a better "lock-pick" brings as much if not more risk to end users if that is one's primary concern. It could also be argued that your attack on the node in question brought needless attention to something that otherwise would have quietly vanished into a trivial oblivion.

The only issue that concerns me when it comes to the consideration of Perl code is any legal threats that it might pose for the Monastery. I do understand and appreciate your concerns as to the reputation of the Monastery and wonder how such issues can be addressed given the current state of the law in this country.

My personal opinion is that this sort of thing falls under the area of the gods. It is their house, and they have to most to loose.

()-()
 \"/
  `