equal
deleted
inserted
replaced
350 |
350 |
351 |
351 |
352 while (my $e = $r->shift_entry) { |
352 while (my $e = $r->shift_entry) { |
353 my $uid = $e->get_value("uid"); |
353 my $uid = $e->get_value("uid"); |
354 my $cn = join(", ", $e->get_value("cn")); |
354 my $cn = join(", ", $e->get_value("cn")); |
355 my $mr = $e->get_value(AT_PRIMARYADDRESS) || "??"; |
355 my $mr = $e->get_value(AT_PRIMARYADDRESS) || ""; # ?? |
356 my $ml = join(", ", $e->get_value(AT_ADDRESS)) || "??"; |
356 my $ml = join(", ", $e->get_value(AT_ADDRESS)) || ""; # ?? |
357 my $mg = join(", ", $e->get_value(AT_GROUP)) || "??"; |
357 my $mg = join(", ", $e->get_value(AT_GROUP)) || ""; # ?? |
358 my $mbox = "user/$uid"; |
358 my $mbox = "user/$uid"; |
359 |
359 |
360 print "$uid: $cn <$mr>"; |
360 print "$uid: $cn <$mr>"; |
361 |
361 |
362 #if (($e->get_value("iusRestrictedMail")||"") eq "TRUE") { |
362 #if (($e->get_value("iusRestrictedMail")||"") eq "TRUE") { |