blib/lib/App/findeps.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 18 | 55 | 32.7 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
48 | 9 | 0 | 0 | $pod and $_ ne "=cut" |
49 | 9 | 0 | 0 | $here and $_ ne $here |
50 | 0 | 9 | 0 | not $pod and /^=(\w+)/ |
9 | 0 | 0 | $pod and $_ eq "=cut" | |
57 | 0 | 9 | 0 | not $here and my(@catch) = /(?:<<(['"])?(\w+)\1?){1,}/g |
9 | 0 | 0 | $here and $_ eq $here | |
66 | 0 | 9 | 0 | not $eval and /eval\s*(['"{])$/ |
9 | 0 | 0 | $eval and /$eval(?:.*)?;$/ | |
9 | 0 | 0 | $eval and /\b(require|use)\s+($qr4name)/ | |
75 | 9 | 0 | 0 | $if > 0 and /^\s*}$/ |
9 | 0 | 0 | $if > 0 and /^\b(require|use)\s+($qr4name)/ | |
148 | 2 | 0 | 0 | $Upgrade and "Module::CoreList"->is_core($name) |
line | l | !l | condition |
---|---|---|---|
23 | 0 | 0 | shift() || $myLib || 'lib' |
161 | 0 | 0 | eval "no strict 'subs';\$${name}::VERSION" || 0 |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
41 | 1 | 0 | 0 | $1 || croak('Unvalid extension was set') |
83 | 0 | 0 | 9 | $eval or $if |
102 | 1 | 0 | 1 | not defined $version or $Upgrade |
0 | 0 | 1 | not defined $version or $Upgrade or $toCpanfile | |
124 | 0 | 0 | 9 | /(?:if|unless)\s+\(.*\)\s*\{.*require\s+($qr4name).*\}/ or /require\s+($qr4name)\s+(?:if|unless)\s+\(?.*\)?/ |