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 66 87 defined $args{$accessor} ? :
35 78 75 $accessors{$accessor}{'builder'} ? :
37 0 144 unless (not $accessors{$accessor}{'required'} or defined $value)
46 41 914 if (defined $value)
47 4 37 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 28 10 unless ($self->has_language)
90 28 0 if ($lang)
97 45 935 if (defined $value)
98 2 43 if (ref $value)
113 43 4611 if (defined $value)
114 2 41 if ((ref $value || '') ne 'HASH')
120 0 1772 if (ref $key)
124 6 1766 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 44 if (not defined $locale or ref $locale)
155 2 0 defined $locale ? :
159 2 42 defined $fb ? :
160 2 42 if (not defined $fb or ref $fb)
161 2 0 defined $fb ? :
167 0 42 $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