It was indeed working. I even managed to write a port scanner utility with telnet as a backend application
But then I changed to another backend application (netcat), as telnet doesnt support UDP connection.
Unfortunately I didnt keep copy of the working version based on telnet
Thanks for your offer, but I dont have any knowledge in perl