| line |
true |
false |
branch |
|
41
|
0 |
0 |
unless $_->test |
|
49
|
0 |
2 |
unless ('File::Flat'->canWrite($base)) |
|
56
|
0 |
3 |
unless ($Section->save($subdir)) |
|
83
|
0 |
9 |
unless my $subtree = $Section->_archive_content |
|
100
|
0 |
9 |
unless my $subtree = $Section->_archive_mode |
|
121
|
5 |
15 |
unless my $Section = _INSTANCE(shift(), 'Archive::Builder::Section') |
|
125
|
2 |
13 |
if (exists $$self{'sections'}{$name}) |
|
139
|
6 |
11 |
unless my $Section = 'Archive::Builder::Section'->new(@_) |
|
147
|
1 |
2 |
ref $_[0] eq 'HASH' ? : |
|
151
|
0 |
4 |
unless my $Section = $self->new_section($name) |
|
152
|
2 |
2 |
if ($sections{$name} ne $name) |
|
153
|
0 |
2 |
unless $Section->path($sections{$name}) |
|
161
|
1 |
2 |
%{$_[0]{'sections'};} ? : |
|
170
|
20 |
1 |
defined $_[1] ? : |
|
175
|
2 |
1 |
defined $_[0] ? : |
|
176
|
1 |
1 |
unless my $Section = $$self{'sections'}{$name} |
|
190
|
1 |
12 |
unless &List::Util::sum(map({$_->file_count;} $_[0]->section_list)) |
|
219
|
25 |
86 |
if ($type eq 'name') |
|
220
|
4 |
21 |
unless defined $string |
|
221
|
13 |
8 |
$string =~ /^\w{1,31}$/ ? : |
|
224
|
49 |
37 |
if ($type eq 'relative path') |
|
229
|
37 |
0 |
if ($type eq 'generator') |
|
230
|
4 |
33 |
unless defined $string |
|
233
|
2 |
31 |
unless ($string =~ /^\w+(::\w+)*$/) |
|
238
|
11 |
20 |
unless $string =~ /::/ |
|
242
|
27 |
4 |
if defined *{"$string";}{'CODE'} |
|
247
|
4 |
0 |
unless ('Class::Inspector'->installed($module)) |
|
259
|
8 |
49 |
unless my $string = _STRING(shift()) |
|
265
|
3 |
46 |
if $string =~ /\\/ |
|
270
|
0 |
46 |
if $string eq '.' |
|
273
|
0 |
46 |
unless 'File::Spec::Unix'->no_upwards($string) |
|
274
|
3 |
43 |
if $string =~ /\.\./ |