Branch Coverage

blib/lib/DBR/Config/Field/Anon.pm
Criterion Covered Total %
branch 4 18 22.2


line true false branch
30 0 5131 unless my $name = $params{'name'}
33 5131 0 if (scalar @parts == 1) { }
0 0 elsif (scalar @parts == 2) { }
36 0 0 if length $table
42 0 5131 unless $field =~ /^[A-Z][A-Z0-9_-]*$/i
44 0 5131 if ($table)
45 0 0 unless $table =~ /^[A-Z][A-Z0-9_-]*$/i
58 0 0 $params{'with_index'} ? :
0 0 $params{'with_alias'} ? :