| line |
true |
false |
branch |
|
152
|
37 |
37 |
if ref $args eq 'HASH' |
|
221
|
1 |
92 |
defined $name ? : |
|
228
|
1 |
17 |
unless ($IN_FLOW) |
|
233
|
18 |
0 |
if mech()->success |
|
235
|
0 |
0 |
mech()->response ? : |
|
251
|
2 |
11 |
if ($type eq 'button') { } |
|
253
|
2 |
0 |
if $ok |
|
254
|
0 |
2 |
ref $link eq 'Regexp' ? : |
|
255
|
0 |
2 |
unless $IN_FLOW |
|
259
|
1 |
10 |
if (ref $link ne 'Regexp') |
|
265
|
8 |
2 |
if $response and $response->is_success |
|
266
|
1 |
9 |
unless $IN_FLOW |
|
267
|
1 |
1 |
$response ? : |
|
|
2 |
8 |
unless $ok |
|
275
|
0 |
0 |
if (not $ret) |
|
306
|
5 |
32 |
$args{'negative'} ? : |
|
309
|
18 |
19 |
if ($args{'match'} eq 'equality') { } |
|
|
8 |
11 |
elsif ($args{'match'} eq 'index') { } |
|
|
11 |
0 |
elsif ($args{'match'} eq 'regex') { } |
|
310
|
2 |
16 |
if ($args{'case_insensitive'}) |
|
316
|
1 |
17 |
$args{'negative'} ? : |
|
323
|
2 |
6 |
if ($args{'case_insensitive'}) |
|
329
|
3 |
5 |
$args{'negative'} ? : |
|
336
|
0 |
11 |
if ($args{'case_insensitive'}) |
|
342
|
1 |
10 |
$args{'negative'} ? : |
|
352
|
32 |
5 |
$match ? : |
|
353
|
2 |
35 |
unless ($IN_FLOW) |
|
358
|
35 |
0 |
if $ok |
|
368
|
1 |
2 |
unless (defined $form) |
|
378
|
0 |
2 |
if ref $data ne 'HASH' |
|
396
|
2 |
27 |
if ($@ =~ /^SKIP: (.*)$/) { } |
|
|
5 |
22 |
elsif ($@) { } |
|
401
|
1 |
4 |
if ($IN_FLOW) |
|
402
|
0 |
1 |
if ($@ =~ /^Flow '/) |
|
411
|
1 |
3 |
if ($@ =~ /^Flow '/) { } |
|
432
|
0 |
17 |
if ($@ =~ /^SKIP: (.*)$/) { } |
|
|
1 |
16 |
elsif ($@ =~ /^Flow '/) { } |
|
|
1 |
15 |
elsif ($@) { } |