| lib/At/Protocol/DID.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 16 | 16 | 100.0 |
| line | true | false | branch |
|---|---|---|---|
| 38 | 9 | 200 | unless $did =~ /^[a-zA-Z0-9._:%-]*$/u |
| 42 | 9 | 191 | if @parts < 3 |
| 44 | 6 | 185 | if $parts[0] ne "did" |
| 46 | 4 | 181 | unless $parts[1] =~ /^[a-z]+$/u |
| 48 | 12 | 169 | if $did =~ /[:%]$/u |
| 49 | 2 | 167 | if length $did > 2048 |
| 57 | 52 | 135 | unless $did =~ /^did:[a-z]+:[a-zA-Z0-9._:%-]*[a-zA-Z0-9._-]$/u |
| 58 | 2 | 133 | if length $did > 2048 |