| line |
true |
false |
branch |
|
21
|
8 |
0 |
if ($linter) { } |
|
61
|
0 |
1 |
unless open my $fh, ">", \$s |
|
70
|
4 |
5 |
if (@_) |
|
71
|
2 |
2 |
if (@_ == 1) { } |
|
|
2 |
0 |
elsif (@_ % 2 == 0) { } |
|
76
|
2 |
0 |
if (defined($v = delete $_{'enable'})) |
|
79
|
1 |
1 |
if (defined($v = delete $_{'command'})) |
|
82
|
0 |
2 |
if (defined($v = delete $_{'path'})) |
|
85
|
0 |
2 |
if keys %_ |
|
91
|
5 |
4 |
if ($self->{'_lint'}{'enable'}) |
|
92
|
0 |
5 |
if ($self->{'_lint'}{'path'}) |
|
94
|
0 |
0 |
unless ("File::Spec"->file_name_is_absolute($prog)) |
|
97
|
0 |
0 |
if (-x $name) |
|
102
|
0 |
0 |
if ($args) |
|
114
|
0 |
0 |
if @_ % 2 |
|
119
|
0 |
0 |
unless $self->tree |
|
120
|
0 |
0 |
unless $self->tree->is_dirty |
|
125
|
0 |
0 |
if (my $cmd = $self->lint) |
|
128
|
0 |
0 |
unless ($ok) |
|
130
|
0 |
0 |
if ($errbuf and @$errbuf) |
|
136
|
0 |
0 |
if $dry_run |
|
140
|
0 |
0 |
unless rename $tempfile, $self->filename |
|
160
|
0 |
0 |
if (-f $backup) |
|
161
|
0 |
0 |
unless unlink $backup |
|
164
|
0 |
0 |
unless rename $self->filename, $self->backup_name |