| line |
true |
false |
branch |
|
38
|
0 |
0 |
if $request->{'is_invalid_request'} or $ds->node_attr($path, 'undocumented') or $ds->node_attr($path, 'disabled') |
|
45
|
0 |
0 |
if ($Web::DataService::ONE_REQUEST) |
|
48
|
0 |
0 |
if $role |
|
54
|
0 |
0 |
unless ($format) |
|
110
|
0 |
0 |
if (defined $doc_template) { } |
|
112
|
0 |
0 |
if $doc_template eq '' |
|
113
|
0 |
0 |
unless $ds->check_doc($doc_template) |
|
120
|
0 |
0 |
if ($path eq '/') { } |
|
129
|
0 |
0 |
if $ds->node_has_operation($path) |
|
136
|
0 |
0 |
unless defined $t |
|
138
|
0 |
0 |
if $ds->check_doc($t) |
|
142
|
0 |
0 |
if ($ds->debug) |
|
154
|
0 |
0 |
if ($doc_template) { } |
|
159
|
0 |
0 |
if ($_[0] =~ qr/ ^ (node|op|path) (abs|rel|site)? [:] ( [^#?]* ) (?: [?] ( [^#]* ) )? (?: [#] (.*) )? /sx) { } |
|
168
|
0 |
0 |
if ($arg ne 'path' and $path =~ qr/ (.*) [.] ([^.]+) $ /x) |
|
186
|
0 |
0 |
if (defined $format and $format eq 'pod') { } |
|
233
|
0 |
0 |
if $ds->check_doc($check1) |
|
237
|
0 |
0 |
if $ds->check_doc($check2) |
|
263
|
0 |
0 |
if ($expr =~ qr/ ^ (\w+) \s* = \s* " ( (?: [^"] | \\{2} | \\" )+ ) " \s* (.*) /sx) { } |
|
|
0 |
0 |
elsif ($expr =~ qr/ ^ (\w+) \s* = \s* ( (?: [^;] | \\{2} | \\; )+ ) \s* (.*) /sx) { } |
|
|
0 |
0 |
elsif ($expr =~ qr/ ^ ; \s* (.*) /sx) { } |
|
270
|
0 |
0 |
unless ($Web::DataService::Node::NODE_DEF{$attr}) |
|
285
|
0 |
0 |
unless ($Web::DataService::Node::NODE_DEF{$attr}) |
|
321
|
0 |
0 |
unless ref $node_hash eq 'HASH' |
|
340
|
0 |
0 |
unless @list |
|
352
|
0 |
0 |
if (defined $body and $body ne '') |
|
357
|
0 |
0 |
if ($options->{'usage'}) |
|
360
|
0 |
0 |
ref $usage eq 'ARRAY' ? : |
|
364
|
0 |
0 |
if ($usage_doc) |
|
394
|
0 |
0 |
ref $usage eq 'ARRAY' ? : |
|
408
|
0 |
0 |
unless defined $example |
|
410
|
0 |
0 |
if ($example =~ qr/ ^ html: | ^ text: /sx) { } |
|
|
0 |
0 |
elsif ($example =~ qr" ( / | http:/+ )? ( [^?.#]+ ) (?: [.] ([^?.#]+) ) (?: [?] ( [^#]+ ) )? (?: [#] (.*) )? "sx) { } |
|
|
0 |
0 |
elsif (ref $example eq 'HASH') { } |
|
418
|
0 |
0 |
if $3 |
|
419
|
0 |
0 |
if $4 |
|
420
|
0 |
0 |
if $5 |
|
421
|
0 |
0 |
if defined $1 and $1 =~ qr/ ^h /x |
|
424
|
0 |
0 |
if $url |
|
430
|
0 |
0 |
if $example->{'format'} |
|
431
|
0 |
0 |
if $example->{'params'} |
|
432
|
0 |
0 |
if $example->{'fragment'} |
|
433
|
0 |
0 |
if $example->{'type'} |
|
436
|
0 |
0 |
if $url |
|
440
|
0 |
0 |
unless @urls |
|
446
|
0 |
0 |
if ($url =~ qr/ ^ (\w+): (.+) /sx) { } |
|
448
|
0 |
0 |
if ($1 eq 'html') { } |
|
|
0 |
0 |
elsif ($1 eq 'text') { } |
|
493
|
0 |
0 |
if ($target =~ qr/ ^ (.*?) \| (.*) /sx) { } |