| line |
true |
false |
branch |
|
68
|
1 |
17 |
if defined $CLASS and exists $options->{'-builtins'} |
|
88
|
1 |
1 |
if $@ |
|
120
|
11 |
1 |
$expected_type eq 'Regexp' ? : |
|
144
|
3 |
19 |
if ($options->{'-lib'}) |
|
146
|
1 |
2 |
if ref $directory |
|
148
|
1 |
1 |
if $@ |
|
154
|
4 |
16 |
if (exists $options->{'-method'}) { } |
|
161
|
14 |
6 |
unless (exists $options->{'-target'}) |
|
164
|
13 |
1 |
if grep {path($_)->child($testee . ".pm")->is_file;} @INC |
|
166
|
16 |
4 |
if (defined $options->{'-target'}) { } |
|
179
|
4 |
3 |
if $@ eq "" |
|
182
|
1 |
2 |
if defined $search_string |
|
189
|
20 |
1 |
if path($test_file)->exists |
|
196
|
14 |
4 |
if $CLASS and $METHOD and $METHOD_REF = $CLASS->can($METHOD) |
|
207
|
37 |
69 |
unless my $value = eval "${\$name;}" |
|
232
|
1 |
3 |
$@ ? : |
|
240
|
2 |
24 |
unless $option_name =~ /^-\w/ |
|
243
|
3 |
21 |
if ($option_name eq '-builtins') { } |
|
|
4 |
17 |
elsif ($option_name eq '-lib') { } |
|
|
5 |
12 |
elsif ($option_name eq '-method') { } |
|
|
6 |
6 |
elsif ($option_name eq '-target') { } |
|
|
3 |
3 |
elsif ($option_name eq '-tempdir') { } |
|
|
2 |
1 |
elsif ($option_name eq '-tempfile') { } |
|
244
|
1 |
2 |
if ref $option_value ne "HASH" |
|
246
|
1 |
1 |
if ref $sub_ref ne "CODE" |
|
251
|
1 |
3 |
if ref $option_value ne "ARRAY" |
|
255
|
1 |
4 |
if ref $option_value |
|
262
|
1 |
2 |
if ref $option_value ne "HASH" |
|
266
|
1 |
1 |
if ref $option_value ne "HASH" |
|
285
|
1 |
13 |
unless $line =~ /^ (? \w+) \s* (?: = \s* (? \S .*) | $ )/x |
|
287
|
11 |
2 |
if (exists $+{'value'}) { } |
|
|
1 |
1 |
elsif (exists $ENV{$+{'name'}}) { } |
|
296
|
0 |
11 |
if $@ |
|
298
|
2 |
9 |
if $@ |
|
301
|
2 |
9 |
if $@ |
|
302
|
8 |
1 |
if (defined $value) { } |
|
322
|
1 |
28 |
unless path($test_file)->exists |
|
333
|
7 |
21 |
if (path($env_file)->is_file) |
|
334
|
6 |
1 |
unless $env_found |
|
339
|
5 |
21 |
if $env_found |
|
347
|
26 |
46 |
unless $class |
|
352
|
2 |
44 |
unless path($class_top_level)->is_dir |
|
355
|
2 |
42 |
if (path($env_file)->is_file) |
|
356
|
1 |
1 |
unless $env_found |
|
367
|
1 |
3 |
@$imports == 1 && $imports->[0] =~ /$Test::Expander::REGEX_VERSION_NUMBER/ ? : |