blib/lib/Devel/Unplug.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 12 | 12 | 100.0 |
line | true | false | branch |
---|---|---|---|
50 | 28 | 19 | 'Regexp' eq ref $unp ? : |
4 | 43 | if 'Regexp' eq ref $unp ? $module =~ /$unp/ : $module eq $unp | |
77 | 5 | 2 | unless exists $unplugged{$unp} and $unplugged{$unp}[1]++ |
96 | 5 | 3 | if exists $unplugged{$mod} and 0 == --$unplugged{$mod}[1] |
108 | 294 | 294 | unless $when eq 'before' |
110 | 290 | 4 | unless _is_unplugged($module) |