blib/lib/Mojolicious/Plugin/ClientIP.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 14 | 16 | 87.5 |
line | true | false | branch |
---|---|---|---|
14 | 2 | 1 | unless $conf->{'private'} |
15 | 1 | 2 | unless $conf->{'ignore'} |
23 | 0 | 20 | if $c->stash($key) |
42 | 0 | 26 | unless /$ip4/ |
43 | 16 | 10 | if _match($_, $self->ignore) |
56 | 5 | 82 | if $ip eq $_ |
58 | 76 | 6 | if (my($net, $prefix) = m[^([\d\.]+)/(\d+)$]) |
60 | 11 | 65 | if substr($ip_bit, 0, $2) eq substr($match_ip_bit, 0, $2) |