Lines Matching refs:pwgid
117 $pwgid = $( + 0;
118 ($pwgnam) = getgrgid($pwgid);
119 $seen{$pwgid}++;
121 print "# pwgid = $pwgid, pwgnam = $pwgnam\n";
144 @basegroup{$pwgid,$pwgnam} = (0,0);
146 @basegroup{$pwgid,$pwgnam} = (1,1);
151 if ($gr1 eq $gr2 || ($gr1 eq '' && $gr2 eq $pwgid)) {
157 %basegroup = ( $pwgid => 1, $pwgnam => 1 );
159 if ($gr1 eq $gr2 || ($gr1 eq '' && $gr2 eq $pwgid)) {
172 if ($pwgid == 0 || $seen{0} < 2) {