| blib/lib/Business/DK/Phonenumber.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 19 | 24 | 79.1 |
| line | true | false | branch |
|---|---|---|---|
| 24 | 81 | 0 | unless (ref $self) |
| 30 | 37 | 44 | if ($phonenumber =~ / \A( (?:[+])(?:45)(?:\d{8})| #+4512345678 (?:45)(?:\d{8})| #4512345678 (?:\d{8}) #12345678 )\z/gmsx) { } |
| 47 | 2 | 114 | if ($self =~ /\A[\D]+\b/msx and not ref $self) { } |
| 110 | 4 | elsif (not ref $self) { } | |
| 57 | 1 | 3 | if ($template) { } |
| 58 | 1 | 0 | if (ref $self) { } |
| 68 | 4 | 0 | unless ($phonenumber) |
| 94 | 1 | 3 | unless ($amount) |
| 98 | 2 | 2 | unless ($template) |
| 104 | 0 | 105 | if (ref $self) { } |
| 122 | 0 | 105 | if (ref $self) { } |
| 141 | 8 | 8 | if ($sum == 8) { } |