--- a/update-mailboxes	Tue May 06 12:28:06 2008 +0000
+++ b/update-mailboxes	Wed May 28 13:51:32 2008 +0000
@@ -91,12 +91,15 @@
         my $ldap = new Net::LDAP( $LDAPSERVER, onerror => "die" );
         $ldap->bind( $LDAPADMIN, password => $LDAPPASS );
         foreach my $ou (@OU) {
-            my $msg = $ldap->search(
-                base   => "$ou,$LDAPBASE",
-                filter => "(&(samAccountName=*))",
-                attrs  => ["samAccountName"],
-            );
-            push @entries, $msg->entries;
+			eval {
+				my $msg = $ldap->search(
+					base   => "$ou,$LDAPBASE",
+					filter => "(&(samAccountName=*))",
+					attrs  => ["samAccountName"],
+				);
+				push @entries, $msg->entries;
+			};
+			warn "problem using $ou,$LDAPBASE: $@\n" if $@;
         }
 
     }