my $filter = "(objectclass=cRLDistributionPoint)";

my $ldap = $functions->ldap($ldapserver, $useraccount, $password);
my $objects = $functions->ldap_search($ldap, $filter, 'sub', $basedn);

foreach my $entry ($objects->entries)
{
	print $entry->get_value('cn') . "\n";

}