Branch Coverage

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($_)