| line | % | coverage | branch |
|---|
| 50 | 0 | T | F | if (@_) { } |
| 90 | 50 | T | F | if ($base_type eq 'HASH') { } |
| 50 | T | F | elsif ($base_type eq 'ARRAY') { } |
| 93 | 0 | T | F | if @_ |
| 98 | 0 | T | F | if @_ |
| 105 | 50 | T | F | if @decls % 2 == 1 |
| 113 | 50 | T | F | if @$isa |
| 119 | 50 | T | F | if do {
no strict 'refs';
defined &{$class . '::new';}
} |
| 137 | 50 | T | F | if ($base_type eq 'HASH') { } |
| 50 | T | F | elsif ($base_type eq 'ARRAY') { } |
| 148 | 50 | T | F | if ($base_type eq 'HASH') { } |
| 50 | T | F | elsif ($base_type eq 'ARRAY') { } |
| 156 | 50 | T | F | if ($type =~ /^\*(.)/) |
| 161 | 100 | T | F | if ($type eq '@') { } |
| 100 | T | F | elsif ($type eq '%') { } |
| 50 | T | F | elsif ($type eq '$') { } |
| 0 | T | F | elsif ($type =~ /^\w+(?:::\w+)*$/) { } |
| 196 | 50 | T | F | if (do {
no strict 'refs';
defined &{$class . "::$name";}
}) { } |
| 201 | 50 | T | F | if (defined $refs{$name}) |
| 207 | 50 | T | F | if ($base_type eq 'ARRAY') { } |
| 0 | T | F | elsif ($base_type eq 'HASH') { } |
| 214 | 100 | T | F | if (defined $arrays{$name}) { } |
| 100 | T | F | elsif (defined $hashes{$name}) { } |
| 50 | T | F | elsif (defined $classes{$name}) { } |
| 225 | 0 | T | F | if ($CHECK_CLASS_MEMBERSHIP) |
| 236 | 50 | T | F | if $print |
| 237 | 50 | T | F | if @_ > 1 |
| 100 | T | F | @_ ? : |
| 50 | T | F | @_ ? : |
| 0 | T | F | if @_ > 1 |
| 0 | T | F | @_ ? : |
| 50 | T | F | @_ ? : |
| 0 | T | F | if @_ > 1 |
| 0 | T | F | @_ ? : |
| 50 | T | F | unless @_ |
| 50 | T | F | defined $init{'id'} ? : |
| 50 | T | F | defined $init{'valid'} ? : |
| 50 | T | F | if defined $init{'path'} and ref $init{'path'} ne 'ARRAY' |
| 50 | T | F | defined $init{'path'} ? : |
| 50 | T | F | if defined $init{'input'} and ref $init{'input'} ne 'ARRAY' |
| 50 | T | F | defined $init{'input'} ? : |
| 50 | T | F | if defined $init{'macro'} and ref $init{'macro'} ne 'HASH' |
| 50 | T | F | defined $init{'macro'} ? : |
| 50 | T | F | @_ ? : |
| 0 | T | F | if @_ > 1 |
| 0 | T | F | @_ ? : |
| 50 | T | F | if @_ > 1 |
| 100 | T | F | @_ ? : |
| 238 | 50 | T | F | if $@ |