| blib/lib/Z.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 5 | 18 | 27.7 |
| line | true | false | branch |
|---|---|---|---|
| 16 | 1 | 0 | $] ge '5.014' ? : |
| 31 | 1 | 0 | if ($_[0] || '') =~ /^-/ |
| 36 | 1 | 0 | if $mode eq '-compat' |
| 63 | 0 | 1 | unless (eval { |
| 102 | 1 | 0 | if ($] ge '5.010') { } |
| 244 | 0 | 0 | unless $dest |
| 246 | 0 | 0 | unless (my $source = $also{$func}) |
| 252 | 0 | 0 | ref $source ? : |
| 257 | 0 | 0 | if ($source eq 'CODE') { } |