line |
true |
false |
branch |
18
|
1 |
0 |
if ($arg eq '-with') { } |
19
|
0 |
1 |
unless $i++ < @args |
28
|
0 |
3 |
if (grep /^-?global$/, @args) |
41
|
0 |
1 |
unless $DumpModule =~ /^(
(?:YAML|JSON)(?:::.*)?|
Data::Dumper|
Data::Dump(?:::Color)?
)$/x |
53
|
0 |
0 |
$DumpModule eq 'Data::Dump::Color' ? : |
|
0 |
0 |
$DumpModule eq 'Data::Dump' ? : |
|
1 |
0 |
$DumpModule eq 'Data::Dumper' ? : |
|
0 |
1 |
substr($DumpModule, 0, 4) eq 'JSON' ? : |
|
2 |
1 |
substr($DumpModule, 0, 4) eq 'YAML' ? : |
60
|
2 |
1 |
unless (defined ${"${DumpModule}::VERSION";}) |
61
|
0 |
2 |
unless eval "require $DumpModule; 1" |
63
|
2 |
1 |
if ($DumpModule eq 'YAML::PP') |
66
|
0 |
1 |
if ($dump_type eq 'yaml') |
69
|
0 |
1 |
if ($dump_type eq 'json') |
72
|
1 |
0 |
if ($dump_type eq 'dumper') |
77
|
0 |
0 |
if ($dump_type eq 'dump') |
80
|
0 |
0 |
if ($dump_type eq 'dumpcolor') |
92
|
0 |
3 |
if defined &$skipper and &$skipper() |
101
|
0 |
0 |
if (defined &main::diag and defined &Test::More::diag and \&main::diag eq \&Test::More::diag) { } |
110
|
0 |
0 |
wantarray ? : |
119
|
0 |
0 |
if (defined &main::note and defined &Test::More::note and \&main::note eq \&Test::More::note) { } |
128
|
0 |
0 |
wantarray ? : |