| line |
true |
false |
branch |
|
34
|
195 |
3 |
if $target->can($needed_methods) |
|
47
|
59 |
5 |
if (@target_isa) { } |
|
67
|
1 |
58 |
if $@ |
|
79
|
0 |
5 |
if ($options_config->{'with_config_from_file'}) |
|
87
|
0 |
63 |
if ($options_config->{'with_config_from_file'}) |
|
101
|
75 |
64 |
if $target->can('new_with_options') |
|
103
|
0 |
64 |
if ($options_config->{'with_config_from_file'}) |
|
106
|
0 |
64 |
if ($options_config->{'with_locale_textdomain_oo'}) |
|
109
|
0 |
0 |
unless 'MooX::Options::Descriptive::Usage'->can('localizer') |
|
124
|
0 |
63 |
if ($options_config->{'with_config_from_file'}) |
|
131
|
9 |
825 |
if $name eq $ban |
|
137
|
77 |
1 |
if %_moo_attrs |
|
148
|
5 |
58 |
if (my $info = $Role::Tiny::INFO{$target}) |
|
169
|
69 |
9 |
unless defined $options{'doc'} |
|
170
|
72 |
6 |
unless defined $options{'order'} |
|
172
|
2 |
76 |
if ($options{'json'} or defined $options{'format'} and $options{'format'} eq 'json') |
|
184
|
4 |
74 |
if ($options{'autorange'} and not defined $options{'autosplit'}) |
|
188
|
4 |
0 |
if eval {
do {
&use_module('Data::Record');
&use_module('Regexp::Common')
}
} |
|
192
|
2 |
76 |
if exists $options{'negativable'} |
|
198
|
13 |
65 |
if $cmdline_options{'autosplit'} or $cmdline_options{'autorange'} |
|
202
|
8 |
6 |
if $cmdline_options{'repeatable'} and defined $cmdline_options{'format'} and substr($cmdline_options{'format'}, -1) ne '@' |
|
208
|
2 |
76 |
if $cmdline_options{'negatable'} and defined $cmdline_options{'format'} |