| blib/lib/DBR/Config/Table/Anon.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 3 | 8 | 37.5 |
| line | true | false | branch |
|---|---|---|---|
| 30 | 0 | 1039 | unless my $name = $params{'name'} |
| 33 | 0 | 1039 | unless $name =~ /^[A-Z][A-Z0-9_-]*$/i |
| 35 | 0 | 1039 | if (defined $alias) |
| 36 | 0 | 0 | unless $alias =~ /^[A-Z][A-Z0-9_-]*$/i |