| blib/lib/Util/Any.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 72 | 87 | 82.7 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 43 | 4 | 86 | 34 | @_ and $_[0] =~ /^-[A-Z]\w+$/o |
| 46 | 38 | 10 | 42 | @_ > 1 and ref $_[-1] eq 'HASH' |
| 52 | 4 | 4 | 0 | $opt{'plugin'} and $opt{'plugin'} ne 'eager' |
| 58 | 36 | 47 | 7 | @_ == 1 and ref $_[0] eq 'HASH' |
| 99 | 357 | 0 | 8 | $$opt{'module_prefix'} && $module_prefix |
| 162 | 24 | 5 | 0 | %$want_funcs and not exists $$want_funcs{$func} |
| 235 | 92 | 0 | 0 | ref $$org_args[0] and ref $$org_args[0] eq 'HASH' |
| 237 | 11 | 57 | 4 | $$opt{'plugin'} eq 'lazy' and $pkg->can('_plugins') |
| 240 | 2 | 17 | 1 | $$opt{'plugin'} eq 'lazy' and $pkg->can('_plugins') |
| 243 | 6 | 10 | 4 | $inherit_all and $import_module |
| 262 | 31 | 24 | 2 | $ref eq 'ARRAY' and not @$import_setting |
| 331 | 7 | 2 | 0 | $all_regex and $plugin =~ /$all_regex\W/i || $plugin =~ /$all_regex$/i |
| 404 | 42 | 0 | 45 | @flgs and my $flg = lc shift @flgs |
| line | l | !l | condition |
|---|---|---|---|
| 51 | 33 | 327 | $opt{$_} ||= 0 |
| 67 | 8 | 8 | $$config{$kind} ||= [] |
| 166 | 29 | 0 | $$def{-'as'} || '' |
| 236 | 83 | 9 | $$opt{'plugin'} ||= '' |
| 300 | 2 | 2 | $$config{$kind} ||= [] |
| 330 | 4 | 5 | $$config{$kind} ||= [] |
| 363 | 4 | 9 | $local_definition{$k} ||= [] |
| 370 | 13 | 236 | $kind_prefix || '' |
| 1 | 248 | $kind_args || {} |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 127 | 10 | 0 | 0 | $$def{-'as'} || $function |
| 167 | 1 | 28 | 0 | $reverse_rename{$func} || $func |
| 188 | 95 | 7 | 285 | $prefix or %$rename |
| 192 | 77 | 0 | 1190 | $$rename{$_} || $_ |
| 207 | 3 | 1 | 5 | $str =~ /^$kind/ || $str =~ /$kind$/ |
| 244 | 1 | 0 | 3 | $import_module eq 'Exporter' or $import_module eq 'Exporter::Simple' |
| 275 | 8 | 2 | 1 | @arg or not @$org_args |
| 325 | 2 | 5 | 5 | $plugin =~ /$regex\W/i or $plugin =~ /$regex$/i |
| 331 | 1 | 1 | 0 | $plugin =~ /$all_regex\W/i || $plugin =~ /$all_regex$/i |
| 391 | 1 | 0 | 5 | ${"${pkg}::SubExporterImport";} || $SubExporterImport |