| blib/lib/Value/Object/Identifier.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 8 | 8 | 100.0 |
| line | true | false | branch |
|---|---|---|---|
| 13 | 1 | 15 | unless defined $value |
| 14 | 1 | 14 | unless length $value |
| 15 | 2 | 12 | unless $value =~ /\A[a-zA-Z_]/ |
| 16 | 1 | 11 | unless $value =~ /\A[a-zA-Z_][a-zA-Z0-9_]*\z/ |