blib/lib/OpenID/Lite/Util/XRI.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 4 | 18 | 22.2 |
line | true | false | branch |
---|---|---|---|
13 | 7 | 0 | if ($identifier and length $identifier > 0) |
19 | 4 | 3 | if $identifier =~ m[^xri://] or any sub { $first eq $_; } , @XRI_AUTHORITIES |
26 | 1 | 0 | unless $xri =~ m[^xri\://] |
55 | 0 | 0 | if ($xri =~ m[^xri://]) |
63 | 0 | 0 | if index($xri, 'xri://') == 0 |
67 | 0 | 0 | if ($authority =~ /^(\([^\)]*\))/) { } |
0 | 0 | elsif ($authority =~ /^([\!\=\@\+\$\(])/) { } | |
81 | 0 | 0 | unless $provider_id and $canonical_id |
83 | 0 | 0 | if $lastbang < 0 |