| blib/lib/Stone.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 2 | 31 | 6.4 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 612 | 21 | 0 | 0 | ref $arg[0] and ref $arg[0] eq 'HASH' |
| 629 | 0 | 0 | 0 | ref $arg[0] and ref $arg[0] eq 'HASH' |
| 675 | 0 | 0 | 0 | defined $$self{$key} and not $index |
| 747 | 0 | 0 | 0 | ref $obj and $obj->isa('Stone') |
| 785 | 0 | 0 | 4 | $_->isa('Stone') and not exists $$_{'.name'} |
| line | l | !l | condition |
|---|---|---|---|
| 710 | 0 | 0 | $$self{'.att'} ||= {} |
| 804 | 0 | 0 | shift() || 25 |
| 833 | 0 | 0 | $modify ||= \&_default_modify_html |
| 844 | 0 | 0 | shift() || 'Stone' |
| 845 | 0 | 0 | shift() || \&_default_modify_xml |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 656 | 0 | 0 | 0 | $index eq '#' or $index == -1 |
| 812 | 0 | 0 | 0 | not defined $max[$i] or $max[$i] < length $fields[$i] |