| line |
true |
false |
branch |
|
65
|
1 |
3 |
if (not ref $self and ref $package)
|
|
74
|
4 |
0 |
unless ($package_file_name =~ /[.]pm\z/msx)
|
|
78
|
0 |
4 |
unless (eval {
do {
my $package_file_name = $package;
$package_file_name =~ s[::][/]gmsx;
unless ($package_file_name =~ /[.]pm\z/msx) {
$package_file_name .= '.pm';
} ;
require $package_file_name
}
})
|
|
149
|
18 |
1 |
if (not ref $$attributes{$key} and ref $self->meta->get_attribute($key) ne $ATTRIBUTE_METACLASS_TO_SKIP || $$arg_refs{'include_no_getopt'})
|
|
157
|
5 |
8 |
if (ref $$attributes{$key} eq 'HASH')
|
|
161
|
10 |
0 |
if (defined $$attributes{$key}{$h_key} and not ref $$attributes{$key}{$h_key})
|
|
170
|
7 |
6 |
if (ref $$attributes{$key} eq 'ARRAY')
|
|
174
|
18 |
12 |
if (defined $value and not ref $value)
|
|
186
|
2 |
5 |
if ($$arg_refs{'single_dash'}) { }
|
|
272
|
0 |
276 |
unless $reader
|
|
275
|
0 |
276 |
if $reader =~ /\A_/msx
|
|
280
|
18 |
258 |
if ($$attr{'predicate'})
|
|
282
|
2 |
16 |
unless $self->$pred
|
|
285
|
100 |
174 |
if ($init_arg and not exists $$arg_refs{$init_arg} and defined $self->$reader)
|
|
286
|
0 |
9 |
if $attr->type_constraint eq 'Bool' and $command_options and not $self->$reader
|
|
287
|
8 |
92 |
$attr->type_constraint eq 'Bool' && $command_options ? :
|
|
299
|
53 |
25 |
unless ref $$hash{$key}
|
|
300
|
7 |
18 |
if (ref $$hash{$key} eq 'HASH')
|
|
304
|
9 |
9 |
if (ref $$hash{$key} eq 'ARRAY')
|
|
321
|
24 |
16 |
unless (ref $item)
|
|
325
|
8 |
8 |
if (ref $item eq 'HASH')
|
|
330
|
0 |
8 |
if (ref $item eq 'ARRAY')
|
|
349
|
0 |
0 |
unless ($excluded_attributes or $included_argv_attributes)
|
|
353
|
2 |
10 |
if (not ref $excluded_attributes or ref $excluded_attributes ne 'ARRAY')
|
|
357
|
2 |
8 |
if (not ref $included_argv_attributes or ref $included_argv_attributes ne 'ARRAY')
|
|
371
|
14 |
2 |
unless ($$wanted_argv{$argv})
|
|
385
|
10 |
36 |
if ($value ne '' and not $hash and $$arg_refs{'equal'}) { }
|
|
391
|
14 |
32 |
if ($value ne '' and $$arg_refs{'quotes'}) { }
|