Copyright (C) 2000-2012 |
Manpages Net::LDAP::Control::PagedSection: User Contributed Perl Documentation (3)Updated: 2001-08-24 Index Return to Main Contents NAMENet::LDAP::Control::Paged - LDAPv3 Paged results control objectSYNOPSISuse Net::LDAP; use Net::LDAP::Control::Paged; use Net::LDAP::Constant qw( LDAP_CONTROL_PAGED ); $ldap = Net::LDAP->new( "ldap.mydomain.eg" ); $page = Net::LDAP::Control::Paged->new( size => 100 ); @args = ( base => "cn=subnets,cn=sites,cn=configuration,$BASE_DN", scope => "subtree", filter => "(objectClass=subnet)", callback => \&process_entry, # Call this sub for each entry control => [ $page ], ); my $cookie; while(1) { # Perform search my $mesg = $ldap->search( @args ); # Only continue on LDAP_SUCCESS $mesg->code and last; # Get cookie from paged control my($resp) = $mesg->control( LDAP_CONTROL_PAGED ) or last; $cookie = $resp->cookie or last; # Set cookie in paged control $page->cookie($cookie); } if ($cookie) { # We had an abnormal exit, so let the server know we do not want any more $page->cookie($cookie); $page->size(0); $ldap->search( @args ); } DESCRIPTION"Net::LDAP::Control::Paged" provides an interface for the creation and manipulatrion of objects that represent the "pagedResultsControl" as described by RFC-2696.CONSTRUCTOR ARGUMENTSIn addition to the constructor arguments described in Net::LDAP::Control the following are provided.
METHODSAs with Net::LDAP::Control each constructor argument described above is also avaliable as a method on the object which will return the current value for the attribute if called without an argument, and set a new value for the attribute if called with an argument.SEE ALSONet::LDAP, Net::LDAP::Control, http://info.internet.isi.edu/in-notes/rfc/files/rfc2696.txtAUTHORGraham Barr <gbarr@pobox.com>Please report any bugs, or post any suggestions, to the perl-ldap mailing list <perl-ldap-dev@lists.sourceforge.net> COPYRIGHTCopyright (c) 2000 Graham Barr. All rights reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.$Id: Paged.pm,v 1.4 2001/08/24 19:31:14 gbarr Exp $
IndexThis document was created by man2html, using the manual pages. Time: 20:45:04 GMT, April 24, 2024 |