I'd suggest trying using netcat to test whether echo/tcp and echo/udp are actually available.
Otherwise, you are probably looking at implementing a similar functionality using Net::Telnet (using the POP port)
. From which you could probably quite easily nab the 'OpenConn' sub to do what you want.