| blib/lib/CGI/Application/URIMapping.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 42 | 101 | 41.5 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 58 | 0 | 0 | 0 | @{$$entry{'path'};} and @{$$entry{'path'};} % 2 == 0 |
| 131 | 3 | 0 | 2 | defined $v and $v ne '' |
| line | l | !l | condition |
|---|---|---|---|
| 37 | 2 | 2 | $dispatch_table{ref $self or $self} ||= {} |
| 38 | 2 | 2 | $uri_table{ref $self or $self} ||= {} |
| 45 | 0 | 4 | $$entry{'host'} || '*' |
| 46 | 1 | 3 | $$entry{'protocol'} || 'http' |
| 66 | 0 | 0 | $$dispatch_table{$host} ||= [] |
| 68 | 0 | 0 | delete $$action{'query'} || [] |
| 82 | 2 | 2 | $$dispatch_table{$host} ||= [] |
| 84 | 3 | 1 | $$entry{'query'} || [] |
| 93 | 0 | 4 | $$entry{'build_uri'} || undef |
| 115 | 1 | 0 | $dispatch_table{ref $self or $self} ||= {} |
| 118 | 1 | 0 | $$dispatch_table{CGI::virtual_host()} || $$dispatch_table{'*'} || {} |
| 154 | 0 | 1 | $$args{'rm'} || undef |
| 162 | 0 | 6 | $$args{'rm'} || undef |
| 164 | 0 | 6 | $$args{'extra'} || [] |
| 169 | 0 | 0 | $$args{'rm'} || undef |
| 172 | 0 | 0 | $$args{'extra'} || [] |
| 175 | 0 | 0 | $$args{'rm'} || undef |
| 188 | 1 | 0 | $dispatch_table{ref $self or $self} ||= [] |
| 207 | 15 | 0 | $uri_table{ref $self or $self} ||= {} |
| 218 | 4 | 4 | $$args{'params'} || [] |
| 243 | 0 | 8 | $$prototype{'build_uri'} || \&_default_build_uri |
| 292 | 0 | 6 | $query->request_method || 'GET' |
| 337 | 4 | 0 | $$table{'query'} ||= [] |
| 347 | 1 | 6 | $$table{'query'}[$i]{'omit'} || undef |
| 361 | 0 | 4 | $$table{'build_uri'} ||= \&_default_build_uri |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 37 | 0 | 4 | 0 | ref $self or $self |
| 38 | 0 | 4 | 0 | ref $self or $self |
| 44 | 0 | 4 | 0 | $$entry{'app'} || (caller)[0] |
| 64 | 0 | 0 | 0 | delete $$action{'host'} || $host |
| 65 | 0 | 0 | 0 | delete $$action{'protocol'} || $proto |
| 68 | 0 | 0 | 0 | $uri_table_entry ||= _build_uri_table_entry({%$entry, 'protocol', $proto2, 'host', $host2, 'path', $path, 'query', delete $$action{'query'} || [], 'action', $action}) |
| 84 | 0 | 4 | 0 | $uri_table_entry ||= _build_uri_table_entry({%$entry, 'protocol', $proto, 'host', $host, 'path', $$entry{'path'}, 'query', $$entry{'query'} || [], 'action', $action}) |
| 98 | 0 | 4 | 0 | ref $self || $self |
| 115 | 0 | 1 | 0 | ref $self or $self |
| 188 | 0 | 1 | 0 | ref $self or $self |
| 190 | 0 | 1 | 0 | $$dispatch_table{CGI::virtual_host()} || $$dispatch_table{'*'} |
| 205 | 0 | 15 | 0 | $rm ||= _pkg2rm($app) |
| 207 | 0 | 15 | 0 | ref $self or $self |
| 243 | 1 | 7 | 0 | $$args{'protocol'} || $$prototype{'protocol'} |
| 295 | 6 | 0 | 0 | $meth eq 'GET' or $meth eq 'HEAD' |