blib/lib/Exporter/Declare.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 11 | 19 | 57.8 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
78 | 0 | 0 | 0 | ref $args and ref $args eq 'ARRAY' |
95 | 7 | 6 | 0 | $class eq 'Exporter::Declare' and grep {$_ eq '-magic';} @args |
242 | 0 | 30 | 15 | @$args and _is_exporter_class(@$args) |
line | l | !l | condition |
---|---|---|---|
176 | 2 | 64 | $expclass || undef |
5 | 61 | $type || '' |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
193 | 2 | 64 | 0 | $params{'export_class'} ||= reftype($params{'ref'}) eq 'CODE' ? 'Exporter::Declare::Export::Sub' : 'Exporter::Declare::Export::Variable' |
250 | 0 | 2 | 0 | shift() || &CORE::GLOBAL::caller() |