| line |
true |
false |
branch |
|
25
|
1 |
12 |
if scalar @opts == 0 |
|
26
|
1 |
11 |
if scalar(@opts) % 2 |
|
35
|
1 |
10 |
if @unknown_opts |
|
37
|
0 |
10 |
unless defined $files |
|
38
|
0 |
10 |
if ref $files ne 'ARRAY' |
|
39
|
1 |
9 |
if scalar @{$files;} == 0 |
|
41
|
2 |
3 |
unless defined $format or defined $format_sub |
|
42
|
1 |
6 |
if defined $format and defined $format_sub |
|
44
|
1 |
5 |
if defined $format and $format ne 'pretty_json' |
|
45
|
1 |
4 |
if defined $format_sub and ref $format_sub ne 'CODE' |
|
47
|
2 |
2 |
defined $format && $format eq 'pretty_json' ? : |
|
51
|
4 |
0 |
if (-e $file_name) { } |
|
58
|
2 |
2 |
if ($ENV{'SELF_UPDATE'}) { } |
|
59
|
0 |
2 |
if ($content eq $expected_content) { } |
|
98
|
0 |
6 |
unless open FH, '<', $file_name |
|
110
|
0 |
4 |
unless open FH, '>', $file_name |