| line |
true |
false |
branch |
|
79
|
0 |
4 |
unless ref $self and ref $doclist eq 'ARRAY' |
|
82
|
1 |
3 |
if ${$$self{'_verbose'};} |
|
111
|
0 |
6 |
if $main::res = -($main::B =~ /(^|_)bundle_/ <=> $main::A =~ /(^|_)bundle_/) |
|
114
|
0 |
6 |
if $main::res = $main::B =~ /$main::simplename.(pm|pod|pod)/ <=> $main::A =~ /$main::simplename.(pm|pod|pod)/ |
|
117
|
0 |
6 |
if $main::res = $main::B =~ /^readme/ <=> $main::A =~ /^readme/ |
|
120
|
0 |
6 |
if $main::res = $main::B =~ /.pod$/ <=> $main::A =~ /.pod$/ |
|
123
|
2 |
4 |
if $main::res = $main::B =~ /.pm$/ <=> $main::A =~ /.pm$/ |
|
126
|
0 |
4 |
if $main::res = $main::B =~ /.pl$/ <=> $main::A =~ /.pl$/ |
|
129
|
0 |
4 |
if $main::res = $main::B =~ /$main::simplename/ <=> $main::A =~ /$main::simplename/ |
|
136
|
1 |
3 |
if ${$$self{'_verbose'};} |
|
139
|
2 |
2 |
if ($#sort_list == 1) |
|
144
|
2 |
4 |
if $useful == $#sort_list |
|
146
|
4 |
0 |
unless ($sort_list[$useful + 1] =~ /\.p(od|m|l)$/) |
|
151
|
0 |
0 |
if ($cmp_name =~ /$main::simplename/) |
|
158
|
1 |
3 |
if ${$$self{'_verbose'};} |
|
174
|
0 |
0 |
if ${$$self{'_verbose'};} |
|
175
|
0 |
0 |
unless open $fh, "<$filename" |
|
181
|
0 |
0 |
if $linecount > 30 |
|
183
|
0 |
0 |
unless close $fh |
|
185
|
0 |
0 |
unless $linecount > 2 |
|
186
|
0 |
0 |
if $desc |
|
200
|
1 |
1 |
if ${$$self{'_verbose'};} |
|
201
|
0 |
2 |
unless open $fh, $filename |
|
205
|
2 |
52 |
if ($line =~ /^=head1[\t ]+DESCRIPTION/) |
|
207
|
1 |
40 |
if $line =~ /^=(head1)|(cut)/ |
|
210
|
1 |
39 |
if $linecount > 30 |
|
216
|
0 |
2 |
unless close $fh |
|
217
|
2 |
0 |
if ($desc =~ /(....\n.*){3}/m) |
|
224
|
1 |
1 |
if ${$$self{'_verbose'};} |
|
227
|
0 |
0 |
if ${$$self{'_verbose'};} |
|
249
|
0 |
4 |
if ${$$self{'_verbose'};} |
|
|
4 |
2 |
unless (-e $filename) |
|
251
|
2 |
0 |
if ($filename =~ /\.p(od|m|l)$/) |
|
253
|
2 |
0 |
if $desc |
|
257
|
0 |
0 |
if $desc |
|
280
|
0 |
4 |
unless ref $self |
|
281
|
4 |
0 |
unless $$self{'setup'} |
|
283
|
1 |
3 |
if ${$$self{'_verbose'};} |
|
295
|
37 |
2 |
unless /\.p(od|m|l)$/ |
|
304
|
2 |
2 |
unless ($desc) |
|
348
|
0 |
2 |
unless $$self{'setup'} |
|
352
|
0 |
2 |
unless opendir BASEDIR, $$self{'expand_dir'} |
|
357
|
1 |
1 |
if ${$$self{'_verbose'};} |
|
358
|
0 |
2 |
wantarray ? : |