Re: ??: ??: Class inheritance, and SUPER under mod_perl2

[Nguyen Vu Hung <suppressed>]

Joe Schaefer ????????:
> Nguyen Vu Hung <suppressed> 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().
>
>   
It won't work. I don't know the reason but because $obj inherits from 02 
classes, not only Net::Cmd::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.
>
>   
I finally gave you and pended this issue.
At the moment, I am hardcoding all the parameters, and it works well :D.

BR,

Vu Hung