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' |