| blib/lib/CPAN/Repository/Perms.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 3 | 22 | 13.6 |
| line | true | false | branch |
|---|---|---|---|
| 31 | 2 | 0 | unless $self->exist |
| 36 | 0 | 0 | if $_ =~ /[^:]:[ \t]/ |
| 37 | 0 | 0 | if $_ =~ /^ +/ |
| 38 | 0 | 0 | unless $_ |
| 40 | 0 | 0 | if (@perm_parts == 3) |
| 44 | 0 | 0 | unless defined $perms{$module} |
| 45 | 0 | 0 | if defined $perms{$module}{$userid} |
| 70 | 0 | 3 | unless grep {$_ eq $perm;} @perm_perms |
| 71 | 3 | 0 | unless defined $self->perms->{$module} |
| 79 | 0 | 0 | defined $self->perms->{$module} ? : |
| 87 | 0 | 0 | if (defined $self->perms->{$_}{$userid}) |