| blib/lib/B/Size2.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 17 | 22 | 77.2 |
| line | true | false | branch |
|---|---|---|---|
| 39 | 307 | 6773 | if ($op->desc eq 'constant array element') { } |
| 105 | 4 | 1234 | if (defined(my $tied = tied ${$sv->object_2svref;})) |
| 114 | 2 | 465 | if (defined(my $tied = tied @{$sv->object_2svref;})) |
| 119 | 313 | 227 | if $vals[$i] |
| 120 | 313 | 227 | $sizecv ? : |
| 130 | 3 | 33 | if (defined(my $tied = tied %{$sv->object_2svref;})) |
| 186 | 0 | 136 | if $ENV{'MOD_PERL'} |
| 200 | 41 | 88 | $sv->FLAGS & 4352 ? : |
| 207 | 0 | 0 | $sv->FLAGS & 8704 ? : |
| 233 | 31 | 373 | if ($package ne $stash) |
| 257 | 0 | 0 | if $$str |