| line |
true |
false |
branch |
|
27
|
0 |
0 |
unless defined $name |
|
36
|
0 |
0 |
unless defined $req_handler |
|
37
|
0 |
0 |
unless defined $run_all_handlers |
|
38
|
0 |
0 |
unless defined $allow_before_handler_to_cancel_event |
|
39
|
0 |
0 |
unless defined $allow_before_handler_to_skip_rest |
|
40
|
0 |
0 |
unless defined $allow_handler_to_skip_rest |
|
41
|
0 |
0 |
unless defined $allow_handler_to_repeat_event |
|
42
|
0 |
0 |
unless defined $allow_after_handler_to_repeat_event |
|
43
|
0 |
0 |
unless defined $allow_after_handler_to_skip_rest |
|
44
|
0 |
0 |
unless defined $stop_after_first_handler_failure |
|
50
|
0 |
0 |
if $name =~ /\A(after|before)_/ |
|
61
|
0 |
0 |
$is_success ? : |
|
63
|
0 |
0 |
if ($res->[0] == 601) |
|
64
|
0 |
0 |
if ($allow_before_handler_to_cancel_event) { } |
|
71
|
0 |
0 |
if ($res->[0] == 201) |
|
72
|
0 |
0 |
if ($allow_before_handler_to_skip_rest) { } |
|
88
|
0 |
0 |
if ($req_handler) |
|
90
|
0 |
0 |
unless @{$Handlers{$name};} |
|
101
|
0 |
0 |
$is_success ? : |
|
103
|
0 |
0 |
if $is_success and not $run_all_handlers |
|
104
|
0 |
0 |
if ($res->[0] == 601) |
|
107
|
0 |
0 |
if ($res->[0] == 602) |
|
108
|
0 |
0 |
if ($allow_handler_to_repeat_event) { } |
|
115
|
0 |
0 |
if ($res->[0] == 201) |
|
116
|
0 |
0 |
if ($allow_handler_to_skip_rest) { } |
|
123
|
0 |
0 |
if not $is_success and $stop_after_first_handler_failure |
|
127
|
0 |
0 |
if ($is_success and $args{'on_success'}) { } |
|
|
0 |
0 |
elsif (not $is_success and $args{'on_failure'}) { } |
|
137
|
0 |
0 |
if $name =~ /\A(after|before)_/ |
|
148
|
0 |
0 |
$is_success ? : |
|
150
|
0 |
0 |
if ($res->[0] == 602) |
|
151
|
0 |
0 |
if ($allow_after_handler_to_repeat_event) { } |
|
158
|
0 |
0 |
if ($res->[0] == 201) |
|
159
|
0 |
0 |
if ($allow_after_handler_to_skip_rest) { } |
|
189
|
0 |
0 |
unless $a->[1] <=> $b->[1] |
|
196
|
0 |
0 |
unless my($plugin_name, $wanted_event, $wanted_prio) = $plugin_name0 =~ /\A(\w+(?:::\w+)*)(?:\@(\w+)(?:\@(\d+))?)?\z/ |
|
211
|
0 |
0 |
unless $args |
|
224
|
0 |
0 |
@_ && ref $_[0] eq 'HASH' ? : |
|
237
|
0 |
6 |
ref $env eq 'ARRAY' ? : |
|
242
|
6 |
9 |
if ($el =~ /\A-(\w+(?:::\w+)*(?:\@.+)?)\z/) { } |
|
243
|
2 |
4 |
if (defined $plugin_name0) |
|
245
|
1 |
1 |
if @plugin_args |
|
249
|
3 |
3 |
unless (@elems) |
|
253
|
1 |
8 |
unless defined $plugin_name0 |
|
257
|
1 |
7 |
unless (@elems) |
|
259
|
1 |
0 |
if @plugin_args |
|
272
|
0 |
0 |
if $read_env |
|
275
|
0 |
0 |
unless defined $ENV{'SCRIPTX_IMPORT'} |
|
284
|
0 |
0 |
unless defined $ENV{'SCRIPTX_IMPORT_JSON'} |
|
294
|
0 |
0 |
if (@_ and $_[0] =~ /\A-/) { } |