| blib/lib/CGI/UntaintPatched.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 10 | 18 | 55.5 |
| line | true | false | branch |
|---|---|---|---|
| 41 | 0 | 3 | unless @as |
| 42 | 0 | 3 | unless @as == 1 |
| 55 | 1 | 2 | unless defined $raw |
| 56 | 1 | 1 | if $raw eq '' |
| 66 | 0 | 1 | if ($@) |
| 67 | 0 | 0 | if $@ =~ /^Died at/ |
| 75 | 1 | 0 | unless ($skip_valid) |
| 76 | 1 | 0 | if (my $ref = $handler->can('is_valid')) |
| 77 | 0 | 1 | unless $handler->$ref |