On Thu, 11 Dec 2003, D.Kreft did scribble: Bug in my code...
> sub referral_connection {
> my ($host, $port) = @_;
>
> my $ldap = Net::LDAP->new($host,
> port => $port,
> chase_referrals => undef); # turn off
Do this instead:
sub referral_connection {
my ($self, $host, $port) = @_;
my $ldap = $self->new($host,
# ...etc....);
__END__
Dances With Perl
7-footer At Large <><
Intranet Technologies
"Paranoia is good" -- mbaxter
