| line |
true |
false |
branch |
|
38
|
0 |
1 |
@_ == 1 && 'HASH' eq ref $_[0] ? : |
|
49
|
0 |
1 |
if exists $arg{'debug'} |
|
79
|
0 |
0 |
if $@ |
|
110
|
0 |
0 |
if $self->cgi->request_method ne 'POST' |
|
117
|
0 |
0 |
unless defined $router_input |
|
163
|
0 |
0 |
unless $self->cgi->request_method =~ / \A (GET|POST) \z /msx |
|
247
|
1 |
3 |
if @headers == 0 or @headers == 1 or @headers == 2 and not $headers[0] =~ / \A - /msx or @headers > 2 and @headers % 2 != 0 |
|
275
|
2 |
13 |
unless @found_items |
|
290
|
0 |
3 |
unless exists $cgi_headers{'-type'} |
|
293
|
0 |
3 |
unless exists $cgi_headers{'-status'} |
|
300
|
0 |
3 |
unless exists $cgi_headers{'-charset'} |
|
340
|
0 |
0 |
unless ($is_form) |
|
342
|
0 |
0 |
$postdata ne '' ? : |
|
363
|
0 |
0 |
@values == 1 ? : |
|
|
0 |
0 |
@values == 0 ? : |
|
370
|
0 |
0 |
if $STANDARD_KEYWORD{$param} or not $has_uploads |
|
376
|
0 |
0 |
if (@field_uploads) |
|
383
|
0 |
0 |
if (exists $keyword{'metadata'}) |
|
391
|
0 |
0 |
if exists $keyword{'extTID'} |
|
394
|
0 |
0 |
if @_uploads |
|
411
|
0 |
0 |
unless grep {defined $_;} @file_handles |
|
431
|
0 |
0 |
unless defined $file_handle |
|
486
|
0 |
0 |
unless $handle |