my $ldap = Net::LDAP->new( $host ); my $self->{ldap} = $ldap;