Well... you have a bunch of Net::LDAP::Entry objects and you write them down in LDIF format using write_entry...
What do you want to be explained?
Anyway, a snippet of code I wrote in 5 minutes
#!/usr/bin/perl + use strict ; use warnings ; + use Net::LDAP ; use Net::LDAP::LDIF ; + my $ldap = Net::LDAP->new('10.39.0.208',port => 3268) ; die unless defined $ldap ; + $ldap->bind('a_dn_of_mine', password => 'a_password_of_mine') or die ; + my $res = $ldap->search(base => 'dc=tiscali,dc=com', filter => '(givenName=Marco)') ; + die $res->code if $res->is_error ; + my $ldif = Net::LDAP::LDIF->new('myself.ldif','w') ; die unless defined $ldif ; + $ldif->write_entry($res->entries) ; + $ldif->done ; $ldap->unbind ;
I hope it helps
Ciao!
--bronto
The very nature of Perl to be like natural language--inconsistant and full of dwim and special cases--makes it impossible to know it all without simply memorizing the documentation (which is not complete or totally correct anyway).
--John M. Dlugosz
In reply to Re: Net::LDAP::LDIF
by bronto
in thread Net::LDAP::LDIF
by nqklooless
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |