my @member = $entry->get_value ('memberOf');
 my @memberof = grep(/\CN=ext\.Group\.([^,]+)/,@member);
  $member = join(',',@memberof);
  
 print "$uid -- $member\n";