Re: Control::VLV error
"Dieter Kluenter" <[email protected]>
| Newsgroups | gmane.comp.lang.perl.modules.ldap |
|---|---|
| Message-ID | <[email protected]> |
Graham Barr <[email protected]> writes: > On Sep 22, 2009, at 11:29 AM, Dieter Kluenter wrote: > >> Graham Barr <[email protected]> writes: >> >>> On Sep 22, 2009, at 4:35 AM, Dieter Kluenter wrote: [...] >> OK, here it is: >> >> 0087 28: SEQUENCE { >> 0089 23: STRING = '2.16.840.1.113730.3.4.9' >> 00A2 1: BOOLEAN = TRUE >> 00A5 : } > > that is weird. > > that should be > > 0000 46: SEQUENCE { > 0002 23: STRING = '2.16.840.1.113730.3.4.9' > 001B 1: BOOLEAN = TRUE > 001E 16: STRING > 0020 : 30 0E 02 01 00 02 01 13 A0 06 02 01 01 02 01 00 > 0............... > 0030 : } > > which is what I got when I ran this test script > > > > use Net::LDAP::Control::VLV; > use Net::LDAP::ASN qw(Control); > use Convert::ASN1 qw(:debug); > use Data::Dumper; > > $vlv = Net::LDAP::Control::VLV->new( > before => 0, > after => 19, > content => 0, > offset => 1, > critical => 'TRUE' > ); > > print Dumper($vlv); > $vlv->to_asn; > print Dumper($vlv); # should add 'value' element to object hash > > $d = $Control->encode($vlv); > > asn_dump($d); > > > Do you have the most up to date perl-ldap installed ? Yes, the version is 0.39 Running your test script, I get the same result as you. -Dieter -- Dieter Klünter | Systemberatung http://dkluenter.de GPG Key ID:8EF7B6C6 53°37'09,95"N 10°08'02,42"E