Revision 4847
Added by daigle over 15 years ago
ldapweb.cgi | ||
---|---|---|
668 | 668 |
my $filter = shift; |
669 | 669 |
my $attref = shift; |
670 | 670 |
my $ldap; |
671 |
my $mesg; |
|
671 | 672 |
|
672 | 673 |
my $foundAccounts = 0; |
673 | 674 |
|
... | ... | |
677 | 678 |
if ($ldap) { |
678 | 679 |
$ldap->start_tls( verify => 'none'); |
679 | 680 |
$ldap->bind( version => 3, anonymous => 1); |
680 |
my $mesg = $ldap->search (
|
|
681 |
mesg = $ldap->search (
|
|
681 | 682 |
base => $base, |
682 | 683 |
filter => $filter, |
683 | 684 |
attrs => @$attref, |
Also available in: Unified diff
made mesg var global to function.