| line |
true |
false |
branch |
|
22
|
4 |
0 |
if ($args[3] and ref $args[3] eq 'HASH') |
|
23
|
3 |
1 |
if exists $args[3]{'PlaceholderPrefix'} |
|
25
|
2 |
2 |
if exists $args[3]{'PlaceholderSuffix'} |
|
31
|
3 |
1 |
defined $prefix ? : |
|
33
|
2 |
2 |
defined $suffix ? : |
|
44
|
0 |
0 |
if ($args[3] and ref $args[3] eq 'HASH') |
|
45
|
0 |
0 |
if exists $args[3]{'PlaceholderPrefix'} |
|
47
|
0 |
0 |
if exists $args[3]{'PlaceholderSuffix'} |
|
53
|
0 |
0 |
defined $prefix ? : |
|
55
|
0 |
0 |
defined $suffix ? : |
|
83
|
32 |
16 |
if (exists $$dbh{'private_dbix_placeholder_named_info'}) |
|
93
|
48 |
804 |
if (substr($token, 0, $prefix_length) eq $prefix and substr($token, $token_length - $suffix_length, $suffix_length) eq $suffix) |
|
109
|
6 |
42 |
unless my $sth = $dbh->SUPER::prepare($new_query) |
|
128
|
30 |
12 |
if (ref $_[0] eq 'HASH') { } |