| blib/lib/HTML/AccountAutoDiscovery.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 7 | 16 | 43.7 |
| line | true | false | branch |
|---|---|---|---|
| 22 | 0 | 1 | unless $res->is_success |
| 40 | 0 | 2 | unless ref $yield eq 'CODE' |
| 46 | 2 | 0 | if ($rdf =~ /xmlns:(\w+)="$foafuri"/o) { } |
| 0 | 0 | elsif ($rdf =~ /xmlns="$foafuri"/o) { } | |
| 56 | 2 | 0 | if ($onlineaccount =~ / <${foaf}accountServiceHomepage[^>]+rdf:resource="(.*)" /sx) |
| 61 | 0 | 2 | if ($onlineaccount =~ m[ <${foaf}accountName>[\s\n]*([^<>]+)[\s\n]* ]sx) |
| 66 | 2 | 0 | if ($onlineaccount =~ /${foaf}accountName="([^<>]+?)"/) |
| 69 | 2 | 0 | if (defined $servicehomepage and defined $accountname) |