| line |
true |
false |
branch |
|
16
|
0 |
1 |
unless $self->origins |
|
17
|
0 |
1 |
unless $self->methods |
|
19
|
1 |
0 |
unless $self->headers |
|
21
|
1 |
0 |
unless defined $self->max_age |
|
22
|
1 |
0 |
unless defined $self->credentials |
|
29
|
1 |
1 |
if ($env->{'REQUEST_METHOD'} eq "OPTIONS") |
|
38
|
0 |
1 |
unless ref $r eq "ARRAY" and ref $r->[1] eq "ARRAY" |
|
53
|
0 |
2 |
unless my $allowed = $self->_origin_allowed($origin) |
|
58
|
0 |
2 |
if $self->credentials |
|
61
|
1 |
1 |
if ($is_preflight) |
|
68
|
0 |
2 |
if ($self->expose_headers and @{$self->expose_headers;}) |
|
76
|
0 |
2 |
unless $origin |
|
79
|
0 |
2 |
if ($allowed eq "*") |
|
80
|
0 |
0 |
$origin eq 'null' ? : |
|
82
|
0 |
2 |
if (ref $allowed eq "Regexp") |
|
83
|
0 |
0 |
if $origin =~ /$allowed/u |
|
85
|
2 |
0 |
if $origin eq $allowed |