| line |
true |
false |
branch |
|
20
|
1 |
15 |
unless my $val = $params->{'value'}
|
|
23
|
0 |
15 |
unless defined $val
|
|
30
|
1 |
17 |
unless my $val = $params->{'value'}
|
|
31
|
0 |
17 |
unless my $affinity = $params->{'affinity'}
|
|
34
|
13 |
4 |
if (my $uuid = $class->looks_like_uuid($val))
|
|
35
|
5 |
8 |
if $affinity eq "string"
|
|
42
|
3 |
1 |
if (my $uuid = $class->looks_like_bin($val))
|
|
43
|
1 |
2 |
if $affinity eq "binary"
|
|
60
|
4 |
0 |
if $da and $db
|
|
61
|
0 |
0 |
unless $da or $db
|
|
69
|
4 |
1 |
if (my $sql_type = $params{'sql_type'})
|
|
70
|
3 |
1 |
if lc $sql_type eq "uuid"
|
|
71
|
1 |
0 |
if $sql_type =~ /(bin(ary)?|bytea?|blob)/i
|
|
74
|
1 |
0 |
if (my $dialect = $params{'dialect'})
|
|
75
|
0 |
1 |
if $dialect->supports_type("uuid")
|
|
85
|
0 |
0 |
if (my $stype = $dialect->supports_type("uuid"))
|
|
97
|
1 |
6 |
unless length $in == 16
|
|
105
|
26 |
7 |
if $in and $in =~ /^[A-F0-9]{8}-[A-F0-9]{4}-[A-F0-9]{4}-[A-F0-9]{4}-[A-F0-9]{12}$/i
|
|
119
|
1 |
0 |
if $params{'name'} =~ /uuid/i
|
|
120
|
0 |
0 |
if $params{'db_name'} =~ /uuid/i
|
|
126
|
0 |
14 |
if $params{'name'} =~ /uuid/i
|
|
127
|
0 |
14 |
if $params{'db_name'} =~ /uuid/i
|