| blib/lib/Classic/Perl.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 22 | 30 | 73.3 |
| line | true | false | branch |
|---|---|---|---|
| 11 | 1 | 7 | unless exists $features{$_} |
| 12 | 0 | 7 | if $] < 5.0089999 |
| 13 | 2 | 5 | if $_ eq '$*' |
| 14 | 0 | 7 | if $] < 5.0109999 |
| 15 | 4 | 3 | if $_ eq 'split' |
| 19 | 6 | 7 | if @_ |
| 20 | 0 | 7 | if $] < 5.0089999 |
| 22 | 0 | 7 | if $] < 5.0109999 |
| 42 | 1 | 0 | unless exists $features{$_} |
| 45 | 0 | 3 | if @_ |
| 50 | 3 | 0 | if (exists $^H{'Classic_Perl__$*'} and $] > 5.0130069 and $INC{'re.pm'}) |
| 59 | 5 | 0 | if ($] > 5.0089999) |
| 71 | 1 | 3 | if $_[1] < 5.0089999 |
| 72 | 3 | 1 | if $_[1] < 5.0109999 |
| 74 | 3 | 1 | if @features |