blib/lib/WebPrototypes/Registration.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 5 | 14 | 35.7 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
94 | 0 | 0 | 0 | $$env{'SERVER_PORT'} && $$env{'SERVER_PORT'} != 80 |
line | l | !l | condition |
---|---|---|---|
94 | 1 | 0 | $$env{'psgi.url_scheme'} // 'http' |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
56 | 1 | 0 | 1 | $uerror or $eerror |
94 | 1 | 0 | 0 | $$env{'HTTP_HOST'} // $$env{'SERVER_NAME'} . ($$env{'SERVER_PORT'} && $$env{'SERVER_PORT'} != 80 ? ':' . $$env{'SERVER_PORT'} : '') |
0 | 1 | 0 | $$env{'HTTP_ORIGIN'} // ($$env{'psgi.url_scheme'} // 'http') . '://' . ($$env{'HTTP_HOST'} // $$env{'SERVER_NAME'} . ($$env{'SERVER_PORT'} && $$env{'SERVER_PORT'} != 80 ? ':' . $$env{'SERVER_PORT'} : '')) |