| line |
true |
false |
branch |
|
49
|
3 |
4 |
scalar @_ == 1 ? :
|
|
50
|
7 |
0 |
$should_clone_args ? :
|
|
55
|
11 |
10 |
if (exists $args->{$key}) { }
|
|
|
2 |
8 |
elsif ($key eq 'package') { }
|
|
|
2 |
6 |
elsif ($key eq 'superclasses') { }
|
|
58
|
5 |
6 |
if ($key eq 'package')
|
|
59
|
2 |
3 |
if ($$built_classes{$args->{$key}})
|
|
61
|
1 |
1 |
unless ($re_use_classes)
|
|
79
|
1 |
6 |
if ($warning) { }
|
|
86
|
1 |
5 |
if (exists $INC{$package_key})
|
|
87
|
1 |
0 |
if ($re_use_classes)
|
|
104
|
0 |
6 |
$pre_exists && !$warning ? :
|
|
106
|
0 |
0 |
if (not $class_name->meta->is_mutable and exists $args->{'add_attributes'} || exists $args->{'add_methods'} || exists $args->{'add_roles_in_sequence'})
|
|
113
|
1 |
5 |
if (exists $args->{'add_attributes'})
|
|
122
|
4 |
2 |
if (exists $args->{'add_methods'})
|
|
131
|
4 |
2 |
if (exists $args->{'add_roles_in_sequence'})
|
|
139
|
6 |
0 |
if ($make_classes_immutable)
|
|
148
|
0 |
3 |
is_HashRef($_[0]) ? :
|
|
149
|
3 |
0 |
$should_clone_args ? :
|
|
153
|
8 |
10 |
if (exists $args->{$key})
|
|
164
|
0 |
3 |
if ($@) { }
|
|
166
|
0 |
0 |
if (ref $message)
|
|
167
|
0 |
0 |
if ($message->can('as_string')) { }
|
|
|
0 |
0 |
elsif ($message->can('message')) { }
|
|
184
|
1 |
0 |
$bool ? :
|
|
190
|
0 |
0 |
$bool ? :
|