| blib/lib/Regexp/Util.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 2 | 6 | 33.3 |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 73 | 0 | 0 | 1 | not defined $str or ref $str |
| 79 | 0 | 1 | 0 | $safe ||= do { require Safe; my $cpt = 'Safe'->new; $cpt->permit(':base_core', ':base_mem', 'sprintf', 'qr'); $cpt } |