| blib/lib/Struct/Path/PerlStyle/Functions.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 8 | 8 | 100.0 |
| line | true | false | branch |
|---|---|---|---|
| 44 | 5 | 1 | defined $_[0] ? : |
| 46 | 1 | 5 | unless &looks_like_number($steps) and int $steps == $steps |
| 47 | 1 | 4 | if $steps == 0 |
| 48 | 1 | 3 | if $steps < 0 or $steps > @{$_{'path'};} |