ok folks so i decided to dump the module. all i needed was to make sure that i can bind so i settled for this:
hope it helps someone:
$socket = new IO::Socket::INET->new(PeerAddr => $ip,
PeerPort => $port,
Proto => 'tcp',
Timeout => 2,
or print "could not create bind to $_. port $port: $@\n" and $e
you have to use gethostbyname to resolve the ip address for the given array of hosts. any questions, just ask..