| line |
true |
false |
branch |
|
49
|
0 |
39 |
if ($arg =~ /^#/) { } |
|
|
8 |
31 |
elsif ($arg =~ /^(\$$App::Presto::ArgProcessor::RE{'balanced'}{-'keep'})$/) { } |
|
55
|
1 |
3 |
ref $result eq 'ARRAY' ? : |
|
66
|
6 |
6 |
if ($param =~ /^(BODY|HEADER)\b(.*)/) { } |
|
|
6 |
0 |
elsif ($param =~ m[^STASH($App::Presto::ArgProcessor::RE{'balanced'}{join $;, -'parens', '[]'})(/.*)?]) { } |
|
|
0 |
0 |
elsif ($param =~ /^FILE($App::Presto::ArgProcessor::RE{'balanced'}{join $;, -'parens', '[]'})($App::Presto::ArgProcessor::RE{'balanced'}{join $;, -'parens', '[]'})?/) { } |
|
|
0 |
0 |
elsif ($param =~ /^PROMPT($App::Presto::ArgProcessor::RE{'balanced'}{join $;, -'parens', '[]'})($App::Presto::ArgProcessor::RE{'balanced'}{join $;, -'parens', '[]'})?/) { } |
|
71
|
3 |
3 |
if ($dpath) |
|
76
|
0 |
0 |
$2 ? : |
|
80
|
0 |
0 |
$default ? : |
|
82
|
11 |
1 |
defined $replacement ? : |
|
90
|
1 |
5 |
if ($section eq 'HEADER' and $sub_section =~ /($App::Presto::ArgProcessor::RE{'balanced'}{join $;, -'parens', '[]'})/) { } |
|
|
4 |
1 |
elsif ($section eq 'BODY') { } |
|
93
|
1 |
3 |
if (not $sub_section) { } |
|
|
3 |
0 |
elsif ($sub_section =~ m[^/]) { } |
|
108
|
1 |
5 |
@matches > 1 ? : |