Branch Coverage

blib/lib/Time/Duration/LocaleObject.pm
Criterion Covered Total %
branch 30 38 78.9


line true false branch
42 2 6 if (my $module = delete $self{'module'})
45 0 6 if (my $lang = delete $self{'language'})
57 54 11 unless ref $self
58 11 54 if (@_)
61 11 0 if (defined $module)
64 4 7 if ($module eq 'Time::Duration::Locale' or $module eq 'Time::Duration::LocaleObject')
78 1 7 unless ref $self
79 6 2 if (@_)
86 7 1 defined $module ? :
92 6 0 $lang eq 'en' ? :
96 0 0 $module =~ /^Time::Duration::(.*)/ ? :
7 0 $module eq 'Time::Duration' ? :
106 3 1 unless ref $self
137 0 4 if $seen{$dashlang}++
143 4 0 if (eval { do { $self->language($lang); 1 } })
190 3 23 if ($Time::Duration::LocaleObject::_make_dispatcher or do { local $Time::Duration::LocaleObject::_make_dispatcher = 1; $class_or_self->setlocale unless $class_or_self->module; my $module = $class_or_self->module; not $module->can($name) })
193 3 23 unless $class_or_self->module
205 36 3 unless ref $self
206 1 38 unless $$self{'module'}