line |
true |
false |
branch |
70
|
0 |
0 |
unless my $opnode = shift() |
73
|
0 |
0 |
if $parent |
109
|
0 |
0 |
ref $items eq 'ARRAY' ? : |
111
|
0 |
0 |
unless my $def = $nss->find('complexType', $fulltype) |
122
|
0 |
0 |
$qname =~ /\:/ ? : |
127
|
0 |
0 |
if ($nss->find('element', $eltype)) { } |
160
|
0 |
6 |
if ($type =~ s/^\{\}//) { } |
165
|
1 |
5 |
unless (length $tns) |
192
|
0 |
26 |
if UNIVERSAL::isa($value, 'XML::LibXML::Element') |
195
|
0 |
26 |
unless $type =~ /^\{|\:/ |
202
|
26 |
0 |
if $child |
211
|
2 |
4 |
unless (defined $id) |
212
|
1 |
1 |
defined $prefid ? : |
225
|
1 |
2 |
@_ == 2 ? : |
229
|
2 |
1 |
$ns ? : |
234
|
1 |
2 |
if $type |
253
|
5 |
13 |
defined $slice && $min + $slice - 1 < $size ? : |
258
|
24 |
2 |
if defined $array->[$i] |
263
|
1 |
17 |
defined $name ? : |
268
|
5 |
13 |
if defined $opts{'id'} |
270
|
0 |
18 |
$opts{'array_type'} ? : |
271
|
18 |
0 |
if defined $at |
273
|
2 |
16 |
if ($sparse) { } |
276
|
2 |
4 |
unless my $row = $array->[$r] |
283
|
6 |
10 |
if $min > 0 |
304
|
0 |
3 |
defined $name ? : |
308
|
0 |
3 |
if defined $opts{'id'} |
312
|
2 |
1 |
if ($sparse) { } |
333
|
0 |
10 |
unless @$array <= $expected |
340
|
42 |
14 |
length $loc ? : |
342
|
37 |
19 |
if (not defined $el) { } |
|
12 |
7 |
elsif (@dims == 0) { } |
|
7 |
0 |
elsif (ref $el eq 'ARRAY') { } |
344
|
0 |
12 |
unless UNIVERSAL::isa($el, 'XML::LibXML::Element') |
368
|
37 |
19 |
unless defined $el |
370
|
12 |
7 |
length $loc ? : |
371
|
12 |
7 |
@dims == 0 ? : |
387
|
0 |
0 |
unless $d->{'_NAME'} |
395
|
0 |
0 |
if $simplify |
398
|
0 |
0 |
unless ref $data eq 'ARRAY' |
401
|
0 |
0 |
unless @$data > 1 |
408
|
0 |
0 |
if defined $root and $root == 0 |
412
|
0 |
0 |
@roots ? : |
418
|
0 |
0 |
@roots ? : |
421
|
0 |
0 |
if (not exists $h{$k}) { } |
|
0 |
0 |
elsif (&reftype($h{$k}) eq 'ARRAY') { } |
426
|
0 |
0 |
if $root_type |
436
|
0 |
0 |
if (substr($type, 0, 1) ne '{') |
437
|
0 |
0 |
$type =~ /^(.*?)\:(.*)/ ? : |
445
|
0 |
0 |
unless $r |
454
|
0 |
0 |
if defined $offset |
461
|
0 |
0 |
if ($dims) |
463
|
0 |
0 |
if ($pos and $pos =~ /^\[([\d,]+)\]/) |
470
|
0 |
0 |
unless ($place) |
475
|
0 |
0 |
if (my $href = $node->getAttribute('href') || '') |
480
|
0 |
0 |
if ($ns ne 'http://schemas.xmlsoap.org/soap/encoding/') |
482
|
0 |
0 |
if ($typedef) |
492
|
0 |
0 |
if ($local eq 'Array') |
509
|
0 |
0 |
ref $child eq 'HASH' ? : |
514
|
0 |
0 |
if defined $id |
526
|
0 |
0 |
if ($@) { } |
530
|
0 |
0 |
if (@childs) { } |
532
|
0 |
0 |
if ($type =~ /(.+?)\s*\[([\d,]+)\]$/) |
539
|
0 |
0 |
if $key eq 'Array' |
540
|
0 |
0 |
if $dec_childs |
544
|
0 |
0 |
if $basetype |
550
|
0 |
0 |
if ref $data ne 'HASH' |
551
|
0 |
0 |
if $basetype |
557
|
0 |
0 |
if defined $id |
564
|
0 |
0 |
unless my $reader = $self->_dec_reader($node, $type) |
567
|
0 |
0 |
if ref $data ne 'HASH' |
574
|
0 |
0 |
unless ref $$node |
576
|
0 |
0 |
if (ref $$node eq 'ARRAY') { } |
|
0 |
0 |
elsif (ref $$node eq 'HASH') { } |
|
0 |
0 |
elsif (UNIVERSAL::isa($$node, 'XML::LibXML::Element')) { } |
583
|
0 |
0 |
if defined $$node->{'id'} |
585
|
0 |
0 |
if (my $href = $$node->{'href'}) |
586
|
0 |
0 |
if $href =~ s/^#// |
599
|
0 |
0 |
if (my $href = $$node->getAttribute('href')) |
600
|
0 |
0 |
if $href =~ s/^#// |
611
|
0 |
0 |
unless ($dest) |
622
|
0 |
0 |
unless my $at = $node->getAttributeNS('http://schemas.xmlsoap.org/soap/encoding/', 'arrayType') || $node->getAttributeNS('http://schemas.xmlsoap.org/wsdl/', 'arrayType') |
626
|
0 |
0 |
unless $at =~ /^(.*) \s* \[ ([\d,]+)? \] $/x |
630
|
0 |
0 |
defined $dims ? : |
633
|
0 |
0 |
if (index($preftype, ':') >= 0) { } |
642
|
0 |
0 |
if (@dims < 2) { } |
647
|
0 |
0 |
$first && $first->getAttributeNS('http://schemas.xmlsoap.org/soap/encoding/', 'position') ? : |
659
|
0 |
0 |
unless $off =~ /^\[(\d+)\]$/ |
664
|
0 |
0 |
if $size |
685
|
0 |
0 |
if (@$dims == 1) |
696
|
0 |
0 |
unless defined $tree |
704
|
0 |
0 |
unless ref $tree |
708
|
0 |
0 |
if $self->{'dec'}{'_simple_recurse'}{$tree} |
712
|
0 |
0 |
if (ref $tree eq 'ARRAY') |
714
|
0 |
0 |
if @a == 1 |
719
|
0 |
0 |
unless ref $hash eq 'HASH' and keys %$hash == 1 |
723
|
0 |
0 |
if (not exists $out{$name}) { } |
|
0 |
0 |
elsif (ref $out{$name} eq 'ARRAY') { } |
726
|
0 |
0 |
if ref $out{$name}[0] ne 'ARRAY' and ref $value eq 'ARRAY' |
734
|
0 |
0 |
unless ref $tree eq 'HASH' |
738
|
0 |
0 |
if ($k =~ /^(?:_NAME$|_TYPE$|id$)/) { } |
|
0 |
0 |
elsif (ref $tree->{$k}) { } |
746
|
0 |
0 |
keys %$tree == 1 && exists $tree->{'_'} ? : |