On 6/27/05, Graeme McLaren <[EMAIL PROTECTED]> wrote:
> Hi all, I am trying to delete entries from an LDAP server and I don't
> understand why my code is not deleting the relevant entries.
[snip]
> here is my code:
> #############################################################
> #!/usr/bin/perl
> use Net::LDAP;
[snip]
> eval{$ldap->delete($dn)};
> if($@){
> print "error: $@ \n";
> }else{
> print "username $_ deleted \n";
> }
Net::LDAP[1] doesn't call die when it encounters an error. You need to
check for an error condition like they do in the example, something
like:
$msg = $ldap->delete($dn);
die $msg->error if $msg->code;
[1] <http://search.cpan.org/~gbarr/perl-ldap-0.33/lib/Net/LDAP.pod>
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
