| blib/lib/Getopt/Yath/Option/List.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 7 | 18 | 38.8 |
| line | true | false | branch |
|---|---|---|---|
| 21 | 28 | 0 | if ${$_[1];} |
| 34 | 32 | 0 | unless $env |
| 35 | 0 | 0 | if defined $ENV{$name} |
| 38 | 0 | 32 | if @val |
| 40 | 0 | 32 | if $self->{'maybe'} |
| 47 | 0 | 64 | if $self->maybe and not @val |
| 55 | 0 | 7 | if ($input[0] =~ /^\s*\[.*\]\s*$/s) |
| 58 | 0 | 0 | unless (eval { do { local $SIG{'__DIE__'}; $out = decode_json($input[0]); 1 } }) |
| 67 | 7 | 0 | if (my $on = $self->split_on) { } |