Try the Perl debugger, run your code with $perl -d ... and try to see what's up, step by step.

As the error is coming up almost immediately, it shouldn't be too hard to follow the upstream calls into Net::Command or IO::Socket::INET in order to find out what the actual problem would be.

Apparently you can't get a local socket - hard to say why.