| line |
true |
false |
branch |
|
17
|
1 |
15 |
unless $new_config = shift()
|
|
19
|
1 |
14 |
if shift()
|
|
21
|
1 |
13 |
unless $new_config and ref $new_config eq 'HASH'
|
|
23
|
1 |
12 |
unless $$new_config{'routes'}
|
|
25
|
1 |
11 |
if (ref $$new_config{'routes'} ne 'ARRAY' and ref $$new_config{'routes'} ne 'HASH')
|
|
29
|
10 |
1 |
if (ref $$new_config{'routes'} eq 'ARRAY')
|
|
31
|
1 |
9 |
unless $route
|
|
33
|
1 |
8 |
unless ref $route eq 'HASH'
|
|
35
|
1 |
7 |
unless $$route{'match'}
|
|
37
|
0 |
7 |
unless ref $$route{'match'} eq 'HASH'
|
|
39
|
2 |
5 |
if ($$route{'transform'})
|
|
40
|
1 |
1 |
if ref $$route{'transform'} ne 'HASH'
|
|
43
|
6 |
0 |
if ($$route{'forwards'})
|
|
44
|
1 |
5 |
if ref $$route{'forwards'} ne 'ARRAY'
|
|
47
|
0 |
5 |
unless $forward
|
|
49
|
1 |
4 |
if ref $forward ne 'HASH'
|
|
51
|
1 |
3 |
unless $$forward{'handler'}
|
|
53
|
1 |
2 |
if ref $$forward{'handler'}
|
|
60
|
13 |
3 |
if ($@)
|
|
69
|
1 |
4 |
unless my $message = shift()
|
|
70
|
1 |
3 |
unless ref $message and ref $message eq 'HASH'
|
|
72
|
0 |
3 |
if shift()
|
|
75
|
2 |
1 |
if (ref $$Message::Router::config{'routes'} eq 'ARRAY') { }
|
|
|
1 |
0 |
elsif (ref $$Message::Router::config{'routes'} eq 'HASH') { }
|
|
84
|
3 |
0 |
if (mmatch($message, $$route{'match'}))
|
|
85
|
3 |
0 |
if ($$route{'transform'})
|
|
88
|
3 |
0 |
if ($$route{'forwards'})
|
|
101
|
1 |
3 |
if ($@)
|
|
106
|
3 |
2 |
if ($@)
|