if ( $self->{ldapTLS} == 1 ) { $ldap_master->start_tls( verify => $self->{verify}, clientcert => $self->{clientcert}, clientkey => $self->{clientkey}, cafile => $self->{cafile}, ); } $ldap_master->bind( $self->{masterDN}, password => $self->{masterPw}, ); #### $ladp_master->code && die "failed to start TLS: ", $ldap_master->error ; #### if ($homedir) { my @rmargs = ('-rf'); # print "rm @rmargs $homedir\n"; system( 'rm', @rmargs, $homedir ); }