[Samba] smbldap-tools Error in perl module decode.pm

[Alan Madill]

smbldap-tools in a working environment suddenly unable to add or modify
users.

smbldap-useradd kenh
Use of uninitialized value in die at
/usr/lib/perl5/vendor_perl/5.8.6/Convert/ASN1/_decode.pm line 111.

Perl debug trace
[root at steel ~]# perl -d /usr/sbin/smbldap-useradd jimh      

Loading DB routines from perl5db.pl version 1.28
Editor support available.

Enter h or `h h' for help, or `man perldebug' for more help.

main::(/usr/sbin/smbldap-useradd:38):
38:     my %Options;
  DB<1> r
Use of uninitialized value in die at
/usr/lib/perl5/vendor_perl/5.8.6/Convert/ASN1/_decode.pm line 111.
 at /usr/lib/perl5/vendor_perl/5.8.6/Convert/ASN1/_decode.pm line 111
        Convert::ASN1::_decode('HASH(0x94305e0)', 'ARRAY(0x9432170)',
'SCALAR(0x931c228)', 0, 5, 'undef', 'ARRAY(0x9911cbc)',
'\x{16}\x{3}\x{1}\x{0}\x{c4}') called at
/usr/lib/perl5/vendor_perl/5.8.6/Convert/ASN1.pm line 252
        eval {...} called at
/usr/lib/perl5/vendor_perl/5.8.6/Convert/ASN1.pm line 247
        Convert::ASN1::decode('Convert::ASN1=HASH(0x9422a44)',
'\x{16}\x{3}\x{1}\x{0}\x{c4}') called at
/usr/lib/perl5/vendor_perl/5.8.6/Net/LDAP.pm line 774
        Net::LDAP::_recvresp('Net::LDAP=HASH(0x94caaf4)', 2) called at
/usr/lib/perl5/vendor_perl/5.8.6/Net/LDAP.pm line 696
        Net::LDAP::sync('Net::LDAP=HASH(0x94caaf4)', 2) called at
/usr/lib/perl5/vendor_perl/5.8.6/Net/LDAP.pm line 740
        Net::LDAP::_sendmesg('Net::LDAP=HASH(0x94caaf4)',
'Net::LDAP::Bind=HASH(0x98d43d8)') called at
/usr/lib/perl5/vendor_perl/5.8.6/Net/LDAP.pm line 363
        Net::LDAP::bind('dn',
'cn=smbldap-tools,ou=DSA,dc=BIDCONST,dc=COM', 'password', 'secret')
called at /usr/lib/perl5/vendor_perl/5.8.6/smbldap_tools.pm line 298
        smbldap_tools::connect_ldap_master() called at
/usr/sbin/smbldap-useradd line 76

This is on a stable system where it has been working.  I upgraded from
smbldap-tools-0.9.1-1 to smbldap-tools-0.9.2-3 which did not help. 
Samba, nis, are all working normally.

I rebuilt the ldap database from a backup ldif file.  Fedora core 4,

[root at steel ~]# rpm -qa | egrep ldap
openldap-devel-2.2.29-1.FC4
smbldap-tools-0.9.2-3.fc4
nss_ldap-234-4
openldap-servers-2.2.29-1.FC4
php-ldap-5.0.4-10.5
python-ldap-2.0.6-4
openldap-2.2.29-1.FC4
openldap-clients-2.2.29-1.FC4


[root at steel ~]# yum deplist smbldap-tools
package: smbldap-tools.noarch 0.9.2-3.fc4
  dependency: perl(Getopt::Std)
   provider: perl.i386 3:5.8.6-15
   provider: perl.i386 3:5.8.6-24
  dependency: perl(lib)
   provider: perl.i386 3:5.8.6-15
   provider: perl.i386 3:5.8.6-24
  dependency: perl(FindBin)
   provider: perl.i386 3:5.8.6-15
   provider: perl.i386 3:5.8.6-24
  dependency: perl(MIME::Base64)
   provider: perl.i386 3:5.8.6-15
   provider: perl.i386 3:5.8.6-24
  dependency: perl(strict)
   provider: perl.i386 3:5.8.6-15
   provider: perl.i386 3:5.8.6-24
  dependency: /usr/bin/perl
   provider: perl.i386 3:5.8.6-15
   provider: perl.i386 3:5.8.6-24
  dependency: perl(IO::Socket::SSL)
   provider: perl-IO-Socket-SSL.noarch 0.97-1.fc4
  dependency: perl(Net::LDAP::LDIF)
   provider: perl-LDAP.noarch 1:0.33-1
  dependency: perl(Digest::SHA1)
   provider: perl-Digest-SHA1.i386 2.10-1
  dependency: openldap-clients
   provider: openldap-clients.i386 2.2.23-5
   provider: openldap-clients.i386 2.2.29-1.FC4
  dependency: perl(Exporter)
   provider: perl.i386 3:5.8.6-15
   provider: perl.i386 3:5.8.6-24
  dependency: perl(File::Basename)
   provider: perl.i386 3:5.8.6-15
   provider: perl.i386 3:5.8.6-24
  dependency: perl(Unicode::MapUTF8)
   provider: perl-Unicode-MapUTF8.noarch 1.09-5
  dependency: config(smbldap-tools) = 0.9.2-3.fc4
   provider: smbldap-tools.noarch 0.9.2-3.fc4
  dependency: perl(smbldap_tools)
   provider: smbldap-tools.noarch 0.9.2-3.fc4
   provider: samba.i386 3.0.23a-1.fc4.1
   provider: samba.i386 3.0.14a-2
  dependency: perl(Crypt::SmbHash)
   provider: perl-Crypt-SmbHash.noarch 0.12-2.fc4
  dependency: samba
   provider: samba.i386 3.0.14a-2
   provider: samba.i386 3.0.23a-1.fc4.1
  dependency: perl(:MODULE_COMPAT_5.8.6)
   provider: perl.i386 3:5.8.6-15
   provider: perl.i386 3:5.8.6-24
  dependency: perl(vars)
   provider: perl.i386 3:5.8.6-15
   provider: perl.i386 3:5.8.6-24
  dependency: perl(Digest::MD5)
   provider: perl.i386 3:5.8.6-15
   provider: perl.i386 3:5.8.6-24
  dependency: perl(Net::LDAP)
   provider: perl-LDAP.noarch 1:0.33-1