foreach my $line (@supp_srch) { chomp($line); ($att_val,$first,$last,$dn) = split /\|/, $line; $attributes = ['cn','displayName','groupType','description', "member;range=${first}-*"]; my $mesg = LDAP_PageSearch ( $ldap, "(&(objectclass=group)(!(objectclass=computer)))", $attributes , "$dn" ); }