| blib/lib/DBIx/Class/Carp.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 23 | 27 | 85.1 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 27 | 7372 | 22299 | 0 | $cref and &Scalar::Util::reftype($cref) ne 'CODE' |
| 48 | 9 | 126 | 2934 | $class and &__safe_can($class, '_skip_namespace_frames') |
| 62 | 30703 | 4 | 2361 | $f[3] eq '(eval)' || $f[1] =~ /^\(eval \d+\)$/ and not defined($eval_src = (caller $fr_num)[6]) |
| 77 | 3236 | 5926 | 2868 | $f[3] =~ /^ (.+) :: ([^\:]+) $/x && !$Carp::Internal{$1} && !($1 =~ /^(?: DBIx::Class::Storage::BlockRunner | Context::Preserve | Try::Tiny | Class::Accessor::Grouped | Class::C3::Componentised | Module::Runtime | Sub::Uplevel )$/x) && !($2 =~ /^(?: throw_exception | carp | carp_unique | carp_once | dbh_do | txn_do | with_deferred_fk_checks | __delicate_rollback | dbic_internal_try )$/x) |
| 87 | 7246 | 0 | 19365 | &__safe_can($f[0], '_skip_namespace_frames') and my $extra_skip = $f[0]->_skip_namespace_frames |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 62 | 2365 | 0 | 30703 | $f[3] eq '(eval)' || $f[1] =~ /^\(eval \d+\)$/ |
| 0 | 2361 | 30707 | $f[2] == 0 or $f[3] eq '(eval)' || $f[1] =~ /^\(eval \d+\)$/ and not defined($eval_src = (caller $fr_num)[6]) | |
| 2361 | 4096 | 26611 | $f[2] == 0 or $f[3] eq '(eval)' || $f[1] =~ /^\(eval \d+\)$/ and not defined($eval_src = (caller $fr_num)[6]) or $f[3] =~ /::__ANON__$/ | |
| 77 | 14577 | 2868 | 9166 | $origin ||= $f[3] =~ /^ (.+) :: ([^\:]+) $/x && !$Carp::Internal{$1} && !($1 =~ /^(?: DBIx::Class::Storage::BlockRunner | Context::Preserve | Try::Tiny | Class::Accessor::Grouped | Class::C3::Componentised | Module::Runtime | Sub::Uplevel )$/x) && !($2 =~ /^(?: throw_exception | carp | carp_unique | carp_once | dbh_do | txn_do | with_deferred_fk_checks | __delicate_rollback | dbic_internal_try )$/x) ? $f[3] : undef |