| line |
true |
false |
branch |
|
114
|
0 |
1 |
@_ && ref $_[0] eq 'HASH' ? :
|
|
119
|
1 |
0 |
if (@modules) { }
|
|
123
|
0 |
2 |
defined $msg ? :
|
|
126
|
1 |
1 |
unless $thisok
|
|
153
|
2 |
0 |
@_ && ref $_[0] eq 'HASH' ? :
|
|
154
|
2 |
0 |
@_ ? :
|
|
157
|
0 |
2 |
unless eval "require $pc_class"
|
|
163
|
1 |
1 |
if (defined $rating) { }
|
|
166
|
0 |
1 |
unless ($ok)
|
|
168
|
0 |
0 |
@nakies == 1 ? :
|
|
181
|
1 |
0 |
unless $nopublics and not $verbose
|
|
201
|
0 |
1 |
@_ ? :
|
|
209
|
15 |
10 |
if (-d $file)
|
|
211
|
0 |
15 |
unless opendir DH, $file
|
|
216
|
24 |
0 |
if $_ ne 'CVS'
|
|
220
|
10 |
15 |
if (-f $file)
|
|
221
|
8 |
2 |
unless $file =~ /\.pm$/
|
|
224
|
2 |
0 |
if @parts and exists $starters{$parts[0]}
|
|
225
|
2 |
0 |
if @parts and $parts[0] eq 'lib'
|
|
226
|
2 |
0 |
if @parts
|
|
230
|
5 |
0 |
if (/^([a-zA-Z0-9_\.\-]+)$/ and $_ eq $1) { }
|
|
246
|
1 |
0 |
if -e 'blib'
|