| line |
l |
!l&&r |
!l&&!r |
condition |
|
102
|
3 |
1 |
36 |
exists $args{'private'} or exists $args{'also_private'} |
|
131
|
12 |
38 |
0 |
$self->{'symbols'} ||= do {
my $package = $self->package;
my(%pods) = map(($_, 1), @{$self->_get_pods($package);});
my(%symbols) = map(($_, $pods{$_} || $self->_trustme_check($_) || 0), $self->_get_syms($package));
unless (grep $_, values %symbols) {
$self->{'why_unrated'} ||= 'no public symbols defined';
} ;
\%symbols
} |
|
397
|
0 |
38 |
0 |
$self->{'_syms'} ||= do {
[$self->_symbols_for($self->package)]
} |
|
407
|
0 |
38 |
0 |
$self->{'_pods'} ||= do {
my $parsed = $self->_parsed;
my(%covered) = map(($_, 1), map(@{$_->covered;}, values %$parsed));
[sort(keys %covered)]
} |
|
419
|
18 |
19 |
0 |
$self->{'_trusted_from_pod'} ||= do {
my $parsed = $self->_parsed;
[map(@{$_->trusted;}, values %$parsed)]
} |