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 69 88 defined $args{$accessor} ? :
35 79 78 $accessors{$accessor}{'builder'} ? :
37 0 148 unless (not $accessors{$accessor}{'required'} or defined $value)
46 43 914 if (defined $value)
47 4 39 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 936 if (defined $value)
98 2 43 if (ref $value)
113 44 4612 if (defined $value)
114 2 42 if ((ref $value || '') ne "HASH")
120 0 1793 if (ref $key)
124 6 1787 if ((ref $val || '') ne "HASH")
125 4 2 defined $val ? :
137 12 30 defined $values ? :
138 4 38 if ((ref $values || '') ne "HASH")
139 4 0 defined $values ? :
147 0 38 $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