blib/lib/builtin/compat.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 6 | 8 | 75.0 |
line | true | false | branch |
---|---|---|---|
167 | 3 | 1 | if ($caller[3] =~ /\A(.*)::BEGIN\z/s) |
172 | 0 | 3 | unless (defined $caller) |
180 | 0 | 45 | unless $EXPORT_OK{$import} |
184 | 2 | 1 | unless ($NO_DISABLE_WARNINGS) |