| blib/lib/Psh/PerlEval.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 0 | 14 | 0.0 |
| line | true | false | branch |
|---|---|---|---|
| 36 | 0 | 0 | if ($redo_sentinel) |
| 45 | 0 | 0 | if (not $@ and @result and $#result == 0 and $str and $result[0] and $result[0] eq $str and not Psh::is_number($str) and $str =~ /^\s*\S+\s*$/ and not $str =~ /^\s*(\'|\")\S+(\'|\")\s*$/) { } |
| 64 | 0 | 0 | if ($@) |
| 94 | 0 | 0 | if ($Psh::word =~ /^\'/) { } |
| 0 | 0 | elsif ($Psh::word =~ /^\"/) { } | |
| 100 | 0 | 0 | if ($@) { } |
| 107 | 0 | 0 | if ($@) { } |