Perl Ldap Bind Example