$mesg = $ldap->search( # perform a search
                       base   => "OU=BLA,DC=yum,DC=bum,DC=sum,DC=tum",
                       filter => "(&(objectClass=user)(objectCategory=person)(AccountType=805306368)(
firstName=Dan*)(lastName=Jones))",
                       attrs => [ 'firstName', 'lastName', 'accountName', 'accountNumber' ] );

$mesg->code && die $mesg->error;

foreach $entry ($mesg->entries) {
     $firstName = $entry->get_value("firstName");
     $lastName = $entry->get_value("lastName");
     $accountName = $entry->get_value("accountName");
     $accountNumber = $entry->get_value("accountNumber");
}

print "$firstName $lastName,$accountName,$accountNumber\n";