Re: Need help with Paging

[Graham B. <gb...@po...>]

Did you really have

    my($resp)  = $mesg->control( LDAP_CONTROL_PAGED ) or last;

or did you have

    my $resp   = $mesg->control( LDAP_CONTROL_PAGED ) or last;

Note that there are no ()' in the second example

Graham.

On Thu, May 24, 2001 at 12:18:56PM -0400, Eric Nichols wrote:
> I'm trying to use Net::LDAP::Control::Paged with ActiveDirectory.  I checked
> the DSA record and it supports paging:
> supportedControl: 1.2.840.113556.1.4.319
> 
> I used the example exactly and it worked.  On a whim I dialed the page size
> back to 5 and ran it again.  I found that I only got 5 objects.  The issue
> seems to be in the lines:
>    # Get cookie from paged control
>    my($resp)  = $mesg->control( LDAP_CONTROL_PAGED ) or last;
>    $cookie    = $resp->cookie or last;
> 
> For some reason $resp dosen't get assigned.  I did a dump using
> Data::Dumper - print Dumper($msg->control)
> I got:
> $VAR1 = bless( {
>                  'value' => '0c00 c ',
>                  'type' => '1.2.840.113556.1.4.319'
>                }, 'Net::LDAP::Control::Paged' );
> 
> When I ran Dumper on $mesg->control( LDAP_CONTROL_PAGED ) I got:
> $VAR1 = 1;
> 
> Obviously the data is in the control part but I can't seem to get it out
> correctly.  Any assistance would be greatly appreciated!
> 
> 
>