in reply to IO::Socket::INET->new(): short form v. long form
Change Peerhost & Peerport to PeerHost & PeerPort and it'll work.
It'd be kinda nice if the module reported failure for the connect attempt though.