my $ldap = Net::LDAPS->new( 'hostname', verify => 'none' )
  or die "$@";