blib/lib/MongoDB/Role/_DeprecationWarner.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 0 | 20 | 0.0 |
line | true | false | branch |
---|---|---|---|
33 | 0 | 0 | if $ENV{'PERL_MONGO_NO_DEP_WARNINGS'} |
35 | 0 | 0 | unless defined $trace |
47 | 0 | 0 | if $ENV{'PERL_MONGO_NO_DEP_WARNINGS'} |
50 | 0 | 0 | unless defined $trace |
72 | 0 | 0 | if (ref $new eq 'ARRAY') |
73 | 0 | 0 | if (@$new == 1) { } |
0 | 0 | elsif (@$new > 1) { } | |
101 | 0 | 0 | unless defined $pkg |
109 | 0 | 0 | if (not $callsite_found and $pkg ne 'Sub::Uplevel') |
111 | 0 | 0 | if $CALL_SITES{join $;, $pkg, $line, $file}++ |