On Fri, Feb 12, 2010 at 6:08 PM, Graham Barr <gb...@pobox.com> wrote:
> In Net/LDAP.pm the bind sub we have
>
> $passwd = {
> mechanism => $sasl_conn->mechanism,
> credentials => (length($initial) ? $initial : undef)
> };
>
> what happens if you change that to be just credentials => $initial,
Here we go:
Net::LDAP=HASH(0xc04818) sending:
30 2C 02 01 01 60 27 02 01 03 04 14 73 6E 3D 6D 0,...`'.....sn=m
73 69 53 63 72 69 70 74 73 2C 64 63 3D 44 54 43 siScripts,dc=DTC
A3 0C 04 08 45 58 54 45 52 4E 41 4C 04 00 __ __ ....EXTERNAL..
0000 44: SEQUENCE {
0002 1: INTEGER = 1
0005 39: [APPLICATION 0] {
0007 1: INTEGER = 3
000A 20: STRING = 'sn=msiScripts,dc=DTC'
0020 12: [CONTEXT 3] {
0022 8: STRING = 'EXTERNAL'
002C 0: STRING = ''
002E : }
002E : }
002E : }
Net::LDAP=HASH(0xc04818) received:
30 0C 02 01 01 61 07 0A 01 00 04 00 04 00 __ __ 0....a........
0000 12: SEQUENCE {
0002 1: INTEGER = 1
0005 7: [APPLICATION 1] {
0007 1: ENUM = 0
000A 0: STRING = ''
000C 0: STRING = ''
000E : }
000E : }
success!
> Graham
Forrest
