Nagios-Plugin-LDAP
view release on metacpan or search on metacpan
lib/Nagios/Plugin/LDAP.pm view on Meta::CPAN
143144145146147148149150151152153154155156157158159160161162163
my
$err
= $@;
$self
->add_message(WARNING,
$err
);
return
;
}
my
$ldap
=
$class
->new(
$hostname
,
timeout
=>
$timeout
,
version
=>
$version
,
inet6
=>
$ipv6
,
);
unless
(
$ldap
) {
my
$err
= $@;
$self
->add_message(CRITICAL,
"$hostname: "
.
$err
);
return
;
}
if
(
$starttls
) {
my
$mesg
=
$ldap
->start_tls;
( run in 0.368 second using v1.01-cache-2.11-cpan-d6f9594c0a5 )