| blib/lib/Scalar/Quote.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 21 | 42 | 50.0 |
| line | true | false | branch |
|---|---|---|---|
| 23 | 51253 | 0 | $c < 256 ? : |
| 36 | 3502 | 51253 | exists $esc{$char} ? : |
| 43 | 0 | 350 | unless defined $s |
| 44 | 350 | 0 | if ($s =~ s(([^!#&()*+,\-./0123456789:;<=>?ABCDEFGHIJKLMNOPQRSTUVWXYZ\[\]\^_`abcdefghijklmnopqrstuvwxyz{|}~ ]))[escape_char $1;]eg) |
| 57 | 0 | 202 | unless defined $a |
| 58 | 0 | 202 | unless defined $b |
| 60 | 0 | 202 | if $a eq $b |
| 72 | 101 | 101 | $la < $lb ? : |
| 75 | 201 | 1 | if ($c =~ /[^\0]/g) |
| 86 | 0 | 200 | unless defined $_[0] |
| 89 | 0 | 200 | if ($end < 0) |
| 93 | 0 | 200 | if ($start < 0) |
| 97 | 0 | 200 | if (length $s >= $start) |
| 103 | 0 | 200 | if (length $e >= $end) |
| 114 | 0 | 0 | defined $_[1] ? : |
| 124 | 0 | 0 | if (defined $_[0]) |
| 125 | 0 | 0 | if ($_[0] =~ /$number_re/o) |
| 137 | 0 | 100 | if $_[0] eq $_[1] |
| 139 | 0 | 100 | defined $_[3] ? : |
| 140 | 0 | 100 | defined $_[2] ? : |
| 145 | 100 | 0 | if wantarray |