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