| line |
true |
false |
branch |
|
100
|
5 |
23 |
unless my $taid = $args{-'tx_action_id'}
|
|
103
|
0 |
23 |
unless defined $path
|
|
105
|
0 |
23 |
unless defined $id
|
|
107
|
0 |
23 |
unless defined $payload
|
|
123
|
1 |
22 |
unless $exists
|
|
124
|
2 |
20 |
if $is_sym or not $is_file
|
|
126
|
0 |
20 |
unless open my $fh, '<', $path
|
|
130
|
20 |
0 |
if ($should_exist) { }
|
|
144
|
2 |
18 |
if $res->[0] == 304
|
|
145
|
0 |
18 |
if $res->[0] != 200
|
|
147
|
9 |
9 |
if ($tx_action eq 'check_state') { }
|
|
|
9 |
0 |
elsif ($tx_action eq 'fix_state') { }
|
|
148
|
9 |
0 |
if ($should_exist) { }
|
|
149
|
0 |
9 |
if $dry_run
|
|
152
|
0 |
0 |
if $dry_run
|
|
163
|
9 |
0 |
if ($should_exist) { }
|
|
171
|
0 |
9 |
unless open my $fh, '>', $path
|
|
173
|
0 |
9 |
unless close $fh
|
|
175
|
9 |
0 |
unless ($>)
|