blib/lib/Data/Struct.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 20 | 26 | 76.9 |
line | true | false | branch |
---|---|---|---|
26 | 0 | 8 | unless @args |
29 | 3 | 5 | unless (defined wantarray) |
31 | 0 | 3 | if (@args == 1 and ref $args[0] eq 'ARRAY') |
36 | 2 | 1 | if @args |
39 | 6 | 0 | unless (wantarray) |
41 | 2 | 4 | if (@args == 1 and ref $args[0] eq 'HASH') |
48 | 3 | 1 | unless @args |
64 | 1 | 0 | unless $a eq 'DESTROY' |
70 | 0 | 4 | unless defined $_ and not ref $_ and /^[^\W\d]\w*$/s |
76 | 1 | 7 | if @_ > 1 |
89 | 1 | 4 | unless (${$struct . ':: type';} || '') eq 'Data::Struct' |
90 | 0 | 4 | unless @$attrs == @$values |
97 | 1 | 1 | unless $s->can($_) |