Metacat

    my $filter = shift;

    my $attref = shift;

    my $ldap;

    my $foundAccounts = 0;

    if ($ldap) {

    	$ldap->start_tls( verify => 'none');

    	$ldap->bind( version => 3, anonymous => 1);

			base   => $base,

			filter => $filter,

			attrs => @$attref,