| blib/lib/YAMLScript/Test.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 12 | 24 | 50.0 |
| line | true | false | branch |
|---|---|---|---|
| 60 | 0 | 8 | if (my $last = $ENV{'LAST'}) { } |
| 0 | 8 | elsif (length(my $only = $ENV{'ONLY'})) { } | |
| 63 | 0 | 0 | unless $only =~ /^[1-9]\d*$/ |
| 66 | 0 | 0 | if $only > $max |
| 78 | 0 | 0 | @_ == 3 ? : |
| 7 | 0 | @_ == 2 ? : | |
| 88 | 0 | 7 | if $@ |
| 94 | 0 | 7 | if (ref $want eq 'Regexp') { } |
| 104 | 6 | 0 | @_ == 3 ? : |
| 45 | 6 | @_ == 2 ? : | |
| 119 | 1 | 50 | if $@ |
| 124 | 1 | 50 | if ($want =~ s[^/(.*)/$][$1]) { } |