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 |
196
|
14 |
4 |
if $CLASS and $METHOD and $METHOD_REF = $CLASS->can($METHOD) |
207
|
33 |
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) { } |
331
|
7 |
21 |
if (path($env_file)->is_file) |
332
|
6 |
1 |
unless $env_found |
337
|
5 |
21 |
if $env_found |
345
|
26 |
46 |
unless $class |
350
|
2 |
44 |
unless path($class_top_level)->is_dir |
353
|
2 |
42 |
if (path($env_file)->is_file) |
354
|
1 |
1 |
unless $env_found |
365
|
1 |
3 |
@$imports == 1 && $imports->[0] =~ /$Test::Expander::REGEX_VERSION_NUMBER/ ? : |