| line |
true |
false |
branch |
|
27
|
0 |
2 |
unless $self->has_filename |
|
61
|
2 |
0 |
if ($self->files->{'META.json'}) { } |
|
|
0 |
0 |
elsif ($self->files->{'META.yml'}) { } |
|
88
|
0 |
3 |
unless -d $dir |
|
103
|
24 |
12 |
if $_->is_file |
|
119
|
0 |
0 |
if $_->is_dir |
|
132
|
2 |
1 |
$self->has_dir ? : |
|
137
|
2 |
3 |
unless $self->has_filename |
|
138
|
1 |
2 |
if $self->dir_has_dist |
|
144
|
14 |
24 |
if ($_->is_dir) { } |
|
196
|
1 |
11 |
if ($key =~ /\.pm$/ or $key =~ /\.pl$/) |
|
199
|
0 |
1 |
unless defined $_ |
|
200
|
1 |
0 |
unless defined $namespaces{$_} |
|
219
|
1 |
11 |
if ($key =~ m[^lib/] and $key =~ /\.pod$/) |
|
240
|
11 |
1 |
unless $_ =~ m[^bin/] or $_ =~ m[^script/] |
|
266
|
0 |
0 |
$self->has_filename ? : |
|
272
|
1 |
2 |
if $self->has_dir and $self->has_filename |
|
277
|
0 |
3 |
unless @args |
|
278
|
2 |
1 |
if @args % 2 == 1 and ref $args[0] ne 'HASH' |
|
279
|
2 |
1 |
if ($arg) |
|
281
|
1 |
1 |
if (-f $arg) { } |
|
|
1 |
0 |
elsif (-d $arg) { } |