my $ldap = Net::LDAP->new( 'myldap.server.com', port => $port, version => 3 ) or die "$@";