Wieso verwendest du denn nicht IO::Socket::INET? Ich finde, dass es das Ganze um einiges einfacher macht.

MfG

edit: Blödsinn entfernt...