This isn't really a Perl question, but a networking one.

If you can do a telnet <host>:<port> and get a response, your Perl code can do the same. This question depends a lot on the specific configuration of the firewall and the rest of the network, which is information that doesn't belong on a public fourm.

----
I wanted to explore how Perl's closures can be manipulated, and ended up creating an object system by accident.
-- Schemer

Note: All code is untested, unless otherwise stated