| blib/lib/CPAN/Repository/Perms.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 1 | 22 | 4.5 |
| line | true | false | branch |
|---|---|---|---|
| 34 | 1 | 0 | unless $self->exist |
| 39 | 0 | 0 | if $_ =~ /[^:]:[ \t]/ |
| 40 | 0 | 0 | if $_ =~ /^ +/ |
| 41 | 0 | 0 | unless $_ |
| 43 | 0 | 0 | if (@perm_parts == 3) |
| 47 | 0 | 0 | unless defined $perms{$module} |
| 48 | 0 | 0 | if defined $perms{$module}{$userid} |
| 73 | 0 | 0 | unless grep {$_ eq $perm;} @perm_perms |
| 74 | 0 | 0 | unless defined $self->perms->{$module} |
| 81 | 0 | 0 | defined $self->perms->{$module} ? : |
| 90 | 0 | 0 | if (defined $self->perms->{$_}{$userid}) |