| blib/lib/HTTP/Session/State/MobileAgentID.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 16 | 20 | 80.0 |
| line | true | false | branch |
|---|---|---|---|
| 16 | 0 | 6 | ref $_[0] ? : |
| 18 | 5 | 1 | exists $args{'mobile_agent'} ? : |
| 19 | 5 | 1 | exists $args{'check_ip'} ? : |
| 20 | 0 | 6 | exists $args{'permissive'} ? : |
| 21 | 5 | 1 | exists $args{'cidr'} ? : |
| 27 | 1 | 5 | unless (defined $self->mobile_agent) |
| 31 | 1 | 0 | unless $ma->is_docomo or $ma->is_softbank or $ma->is_ezweb |
| 34 | 4 | 1 | if ($id) { } |
| 35 | 1 | 3 | if ($self->check_ip) |
| 37 | 1 | 0 | if ($self->cidr->get_carrier($ip) ne $ma->carrier) |