Hi,

On Tuesday, 10. January 2006 20:49, Jim Schnitter wrote:
> I'm having some problems getting the PersistentSearch Control working.
> I've taken the example and found that it's not setting the OID
> correctly.  Here's the relevant code snippet:
>

I cannot reproduce the problem.
What version of perl-ldap do you use ?

You might try the changes below to your sample test program.

#!/usr/bin/perl

use Net::LDAP::Control::PersistentSearch;
use Data::Dumper;       # new !!!

$persist = Net::LDAP::Control::PersistentSearch->new(
                changeTypes => 15,
                changesOnly => 0,
                returnECs => 0 );

if (defined $persist) {
        print "OID of control is ",$persist->type(),"\n";
        print Dumper($persist)."\n";    # new !!!
} else {
        print "didn't create control\n";

It displays the value of the Net::LDAP::Control::PersistentSearch object,
which in my tests (with perl-ldap 0.33) resulted in:

OID of control is 2.16.840.1.113730.3.4.3
$VAR1 = bless( {
                 'changeTypes' => 15,
                 'type' => '2.16.840.1.113730.3.4.3',
                 'returnECs' => 0,
                 'changesOnly' => 0,
                 'asn' => {
                            'changeTypes' => 15,
                            'returnECs' => '0',
                            'changesOnly' => '0'
                          }
               }, 'Net::LDAP::Control::PersistentSearch' );

Regards
Peter
-- 
Peter Marschall
eMail: [EMAIL PROTECTED]

Reply via email to