$ad=Net::LDAPS->new($uri)