Handle hostnames with upper-case letters

https://sourceforge.net/tracker/?func=detail&atid=117457&aid=3427834&group_id=17457

diff --git a/ldap-client/ldap-client-lib.pl b/ldap-client/ldap-client-lib.pl
index fac85fe..97370df 100755 (executable)
--- a/ldap-client/ldap-client-lib.pl
+++ b/ldap-client/ldap-client-lib.pl
@@ -231,7 +231,7 @@ if ($ldap_hosts) {
 elsif ($uri) {
        # Using uri directive
        foreach my $u (split(/\s+/, $uri)) {
-               if ($u =~ /^(ldap|ldaps|ldapi):\/\/([a-z0-9\_\-\.]+)(:(\d+))?/) {
+               if ($u =~ /^(ldap|ldaps|ldapi):\/\/([a-z0-9\_\-\.]+)(:(\d+))?/i) {
                        ($proto, $host, $port) = ($1, $2, $4);
                        if (!$port && $proto eq "ldap") {
                                $port = 389;