| 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) |