in reply to check LDAP Server

You should take a look at Net::LDAP it will allow you carry out reads easily and check the result. This could then be incorporated into an automated check

print "Good ",qw(night morning afternoon evening)[(localtime)[2]/6]," fellow monks."

In Section Seekers of Perl Wisdom