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