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'} |