| blib/lib/Z.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 5 | 18 | 27.7 |
| line | true | false | branch |
|---|---|---|---|
| 15 | 1 | 0 | $] ge '5.014' ? : |
| 30 | 1 | 0 | if ($_[0] || '') =~ /^-/ |
| 35 | 1 | 0 | if $mode eq '-compat' |
| 59 | 0 | 1 | unless (eval { |
| 99 | 1 | 0 | if ($] ge '5.010') { } |
| 230 | 0 | 0 | unless $dest |
| 232 | 0 | 0 | unless (my $source = $also{$func}) |
| 238 | 0 | 0 | ref $source ? : |
| 243 | 0 | 0 | if ($source eq 'CODE') { } |