Hi,
Firstly, thanks for Net::LDAP.
I am using Net::LDAP::LDIF to dump that entries received by calls
to Net::LDAP::search and wish to disable wrapping (so that I can
easily modify output using awk).
I'm running Centos 5.1 with Perl 5.8.8. The perldoc Net::LDAP page lists
Net::LDAP as v5.8.8 with date 2007-02-11
perldoc Net::LDAP::LDIF says:
wrap => 78
Number of columns where output line wrapping shall occur.
Default is 78. Setting it to 40 or lower inhibits wrapping.
I have not been able to disable wrapping and have caused a crash:
Test Cases (where wrap is set at Net::LDAP::LDIF->new(io, mode, wrap=>N)
wrap => 78 (default) behaves as expected:
dn: CN=Jens Schaarup Sørensen,OU=Employees,OU=User Accounts,DC=er,DC=dtu,DC=d
k
wrap => 50 (custom) behaves as expected:
dn: CN=Jens Schaarup Sørensen,OU=Employees,OU=Use
r Accounts,DC=er,DC=dtu,DC=dk
wrap => 40 (custom) disagrees with perldoc Net::LDAP::LDIF (does not disable
wrap)
dn: CN=Jens Schaarup Sørensen,OU=Employ
ees,OU=User Accounts,DC=er,DC=dtu,DC=dk
wrap => 1 (custom) causes a crash:
Illegal division by zero at /usr/lib/perl5/site_perl/5.8.8/Net/LDAP/LDIF.pm
line 391, <SCT> line 1.
Setting wrap to something very large does the equivalent of disabling.
Thanks again for Net::LDAP.
Regards,
--
Hugo Connery
IT Administrator, DTU Environment
http://www.env.dtu.dk
