line |
true |
false |
branch |
25
|
0 |
1 |
if (defined $fh) |
26
|
0 |
0 |
if (ref $fh eq 'DBI::st') { } |
39
|
0 |
0 |
if /^=$/ |
64
|
0 |
0 |
if ($$self{'GROUPS'}{$group} == 0) |
78
|
0 |
0 |
if $nogroups and $self->group($user) |
91
|
0 |
0 |
if ($string and not ref $string) |
93
|
0 |
0 |
$string =~ /[':]/ ? : |
94
|
0 |
0 |
if defined fileno $tmp |
119
|
0 |
0 |
if (ref $fh eq 'DBI::st') { } |
122
|
0 |
0 |
unless $fh->execute($members->next) |
134
|
0 |
0 |
unless print $fh escape($member), '=', escape($group), "\n" |
136
|
0 |
0 |
unless print $fh "=\n" |
144
|
0 |
4 |
if (@_) |
147
|
0 |
0 |
if $got_group eq $want_group |
193
|
2 |
1 |
unless ($norecurse) |
199
|
2 |
2 |
unless ($group{$newgroup}) |
218
|
0 |
0 |
if grep {$_ eq $group;} $self->groups($member, %options) |