line |
true |
false |
branch |
18
|
1 |
0 |
unless @lib |
26
|
0 |
1 |
if @fail |
43
|
0 |
3 |
unless $tb->subtest("$theme load", sub {
subtest_load(@args);
}
) |
63
|
1 |
0 |
if -e 'blib/lib' |
75
|
5 |
3 |
$do_import ? : |
92
|
3 |
6 |
if ($class->isa('Acme::MetaSyntactic::Locale')) { } |
|
0 |
6 |
elsif ($class->isa('Acme::MetaSyntactic::MultiList')) { } |
124
|
1 |
0 |
$class->isa('Acme::MetaSyntactic::MultiList') ? : |
|
1 |
1 |
$class->isa('Acme::MetaSyntactic::List') ? : |
140
|
9 |
0 |
if ($file) { } |
141
|
0 |
9 |
unless (open $fh, $file) |
146
|
0 |
9 |
if ($skip) |
153
|
0 |
9 |
if @lines |
173
|
0 |
3 |
if $error |
184
|
0 |
3 |
unless defined $file |
194
|
0 |
3 |
unless defined $file |
201
|
3 |
0 |
@encoding ? : |
225
|
1 |
2 |
if ($theme =~ /^(?:any|random)$/) { } |
273
|
0 |
5 |
if @failed |
298
|
0 |
5 |
if @failed |
305
|
0 |
3 |
unless defined $file |
313
|
1 |
527 |
if $line =~ /^__DATA__$/ |
314
|
514 |
14 |
unless $in_data |
315
|
0 |
14 |
if /^#/ and not /^# ?(?:names(?: +[-\w]+)*|default)\s*$/ |
350
|
0 |
0 |
!$has_network ? : |
|
0 |
0 |
!$has_lwp ? : |
|
0 |
0 |
!$class->has_remotelist ? : |
|
0 |
0 |
$ENV{'AUTOMATED_TESTING'} ? : |
|
3 |
0 |
!($ENV{'RELEASE_TESTING'} || $ENV{'AUTHOR_TESTING'}) ? : |
361
|
3 |
0 |
if ($why) |
374
|
0 |
0 |
unless (@$remote) |
383
|
0 |
0 |
unless $tb->ok(!grep($_, values %seen), "Local and remote lists are identical for $theme") |
387
|
0 |
0 |
$seen{$_} > 0 ? : |