| From: | Norbert Klasen <norbert.klasen [...] daasi.de> |
| To: | perl-ldap Mailing List <perl-ldap-dev [...] lists.sourceforge.net> |
| Subject: | version-spec in ldif |
| Date: | Mon, 06 May 2002 17:43:37 +0200 |
Hi,
Net::LDAP::LDIF chokes on the following LDIF file:
version: 1
dn: o=test
objectclass: organization
o: test
It interpretes the version-spec as being an entry if followed by more than
one newline. This patch just reads the next entry if that is the case.
--- /usr/lib/perl5/site_perl/5.6.1/Net/LDAP/LDIF.pm Tue Apr 23 12:57:09
2002
+++ LDIF.pm Mon May 6 17:22:36 2002
@@ -109,6 +109,10 @@
if (@ldif and $ldif[0] =~ /^version:\s+(\d+)/) {
$self->{version} = $1;
shift @ldif;
+ if (@ldif == 0) {
+ @ldif = $self->_read_lines;
+ return unless @ldif;
+ }
}
if (@ldif <= 1) {
P.S.: Besides LF, the line separator can also be CR LF.
--
Dipl.-Inform. Norbert Klasen
DAASI International GmbH phone: +49 7071 29 70336
Wilhelmstr. 106 fax: +49 7071 29 5114
72074 Tübingen email: norbert.klasen@daasi.de
Germany web: http://www.daasi.de
Show quoted text
_______________________________________________________________
Have big pipes? SourceForge.net is looking for download mirrors. We supply
the hardware. You get the recognition. Email Us: bandwidth@sourceforge.net