Branch Coverage

blib/lib/Hades/Myths/Object.pm
Criterion Covered Total %
branch 83 102 81.3


line true false branch
8 26 16 scalar @_ == 1 ? :
32 65 87 defined $args{$accessor} ? :
35 78 74 $accessors{$accessor}{'builder'} ? :
37 0 143 unless (not $accessors{$accessor}{'required'} or defined $value)
46 40 914 if (defined $value)
47 4 36 if (ref $value)
57 40 913 if (defined $value)
58 2 38 if (ref $value)
69 25 16 if (defined $locale)
70 4 21 if (ref $locale)
82 3 38 if (not defined $value or ref $value)
83 2 1 defined $value ? :
88 31 7 unless ($self->has_language)
90 31 0 if ($lang)
97 48 935 if (defined $value)
98 2 46 if (ref $value)
113 43 4611 if (defined $value)
114 2 41 if ((ref $value || '') ne 'HASH')
120 0 1829 if (ref $key)
124 6 1823 if ((ref $val || '') ne 'HASH')
125 4 2 defined $val ? :
137 11 30 defined $values ? :
138 4 37 if ((ref $values || '') ne 'HASH')
139 4 0 defined $values ? :
147 0 37 $self->locales ? :
154 2 47 if (not defined $locale or ref $locale)
155 2 0 defined $locale ? :
159 2 45 defined $fb ? :
160 2 45 if (not defined $fb or ref $fb)
161 2 0 defined $fb ? :
167 0 45 $1 && $2 ? :
173 2 5 if (not defined $key or ref $key)
174 2 0 defined $key ? :
177 2 3 if ((ref $locales || '') ne 'HASH')
178 2 0 defined $locales ? :
184 0 3 if (ref $key)
188 3 0 if ((ref $val || '') ne 'HASH')
189 2 1 defined $val ? :
201 2 918 if (not defined $key or ref $key)
202 2 0 defined $key ? :
205 6 912 defined $locale ? :
206 2 916 if (not defined $locale or ref $locale)
207 2 0 defined $locale ? :
211 4 912 defined $lang ? :
212 2 914 if (not defined $lang or ref $lang)
213 2 0 defined $lang ? :
216 2 912 defined $fb ? :
217 2 912 if (not defined $fb or ref $fb)
218 2 0 defined $fb ? :
224 0 912 unless ref $self->locales->{$key} and scalar keys %{$self->locales->{$key};}
320 0 0 if $1