my $ldap = Net::LDAP->new( $host, port => $port, version => 3 ) or die "$@";

##</code><code>##

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