Nguyen Vu Hung <[EMAIL PROTECTED]> writes: > foreach $h (@{$hosts}) > { > > $obj = $type->SUPER::new(PeerAddr => ($host = $h),
Are you sure you want SUPER::new()? I think in your case it translates to Net::Cmd::new(), when your args suggest you want IO::Socket::INET::new(). > PeerPort => 110, #$arg{PeerPort} || 110,#(110)', > Proto => 'tcp', > LocalPort => 110, You can't bind to LocalPort 110 unless you are root. Try doing without the "LocalPort => 110" argument, there's probably no need for it. -- Joe Schaefer