line |
!l |
l&&!r |
l&&r |
condition |
124
|
15 |
0 |
0 |
$probability and int((rand()) * $probability) % $probability != 0 |
145
|
9 |
0 |
6 |
$$container{'skip_bind'} || $ENV{'DBIX_QUERYLOG_SKIP_BIND'} and @params |
184
|
12 |
0 |
0 |
$probability and int((rand()) * $probability) % $probability != 0 |
195
|
11 |
0 |
1 |
$$container{'skip_bind'} || $ENV{'DBIX_QUERYLOG_SKIP_BIND'} and @bind |
225
|
0 |
0 |
330 |
$$dbh{'Driver'}{'Name'} ne 'mysql' and $$dbh{'Driver'}{'Name'} ne 'Pg' |
|
0 |
8 |
322 |
$$dbh{'Driver'}{'Name'} eq 'SQLite' && 1 && !@bind |
|
0 |
322 |
8 |
$$dbh{'Driver'}{'Name'} ne 'mysql' and $$dbh{'Driver'}{'Name'} ne 'Pg' and not $$dbh{'Driver'}{'Name'} eq 'SQLite' && 1 && !@bind |
230
|
122 |
24 |
176 |
$probability and int((rand()) * $probability) % $probability != 0 |
241
|
146 |
0 |
0 |
$$container{'skip_bind'} || $ENV{'DBIX_QUERYLOG_SKIP_BIND'} and @bind |
294
|
4 |
0 |
10 |
defined $args{'print'} and $args{'print'} |
314
|
0 |
0 |
0 |
$pos >= 6 && substr($ret, $pos - 6, 6) =~ /\A[Ll](?:IMIT|imit) \z/ |
321
|
0 |
0 |
0 |
defined $type and $$dbh{'Driver'}{'Name'} eq 'Pg' |
|
0 |
0 |
0 |
defined $type and $$dbh{'Driver'}{'Name'} eq 'Pg' and $type == 0 |
369
|
46 |
238 |
0 |
not $quote_char and $s eq ' ' || $s eq "\n" || $s eq "\t" || $s eq "\r" |
|
1 |
133 |
33 |
not $before_escape and $quote_char |
|
134 |
32 |
1 |
not $before_escape and $quote_char and $s eq '\\' |
376
|
1 |
4 |
7 |
not $before_escape and $s eq $quote_char |
390
|
127 |
0 |
4 |
$s eq ')' || $s eq ',' and substr($buff, -1, 1) eq ' ' |
line |
l |
!l&&r |
!l&&!r |
condition |
47
|
2 |
22 |
0 |
$st_execute ||= $class->_st_execute(sub ;
) |
48
|
2 |
22 |
0 |
$st_bind_param ||= $class->_st_bind_param(sub ;
) |
49
|
2 |
22 |
0 |
$db_do ||= $class->_db_do(sub ;
) |
51
|
2 |
22 |
0 |
$selectall_arrayref ||= $class->_select_array(sub ;
) |
52
|
2 |
22 |
0 |
$selectrow_arrayref ||= $class->_select_array(sub ;
) |
53
|
2 |
22 |
0 |
$selectrow_array ||= $class->_select_array(sub ;
, 1) |
123
|
0 |
0 |
15 |
$$container{'probability'} || $ENV{'DBIX_QUERYLOG_PROBABILITY'} |
141
|
1 |
1 |
13 |
$$container{'explain'} or $ENV{'DBIX_QUERYLOG_EXPLAIN'} |
145
|
4 |
2 |
9 |
$$container{'skip_bind'} || $ENV{'DBIX_QUERYLOG_SKIP_BIND'} |
183
|
0 |
0 |
12 |
$$container{'probability'} || $ENV{'DBIX_QUERYLOG_PROBABILITY'} |
191
|
3 |
3 |
6 |
$$container{'explain'} or $ENV{'DBIX_QUERYLOG_EXPLAIN'} |
195
|
1 |
0 |
11 |
$$container{'skip_bind'} || $ENV{'DBIX_QUERYLOG_SKIP_BIND'} |
229
|
100 |
100 |
122 |
$$container{'probability'} || $ENV{'DBIX_QUERYLOG_PROBABILITY'} |
237
|
3 |
3 |
140 |
$$container{'explain'} or $ENV{'DBIX_QUERYLOG_EXPLAIN'} |
241
|
0 |
0 |
146 |
$$container{'skip_bind'} || $ENV{'DBIX_QUERYLOG_SKIP_BIND'} |
278
|
0 |
0 |
14 |
$$dbh{'Driver'}{'Name'} eq 'mysql' or $$dbh{'Driver'}{'Name'} eq 'Pg' |
308
|
0 |
0 |
180 |
$$dbh{'Driver'}{'Name'} eq 'mysql' or $$dbh{'Driver'}{'Name'} eq 'Pg' |
312
|
0 |
0 |
0 |
$limit_flag ||= do {
my $pos = pos $ret;
$pos >= 6 && substr($ret, $pos - 6, 6) =~ /\A[Ll](?:IMIT|imit) \z/ ? 1 : 0
} |
342
|
1 |
1 |
171 |
$$container{'threshold'} || $ENV{'DBIX_QUERYLOG_THRESHOLD'} |
343
|
171 |
0 |
2 |
not $threshold or $time > $threshold |
350
|
8 |
0 |
179 |
$SKIP_PKG_MAP{$c[0]} or $c[0] =~ /^DB[DI]::/ |
357
|
5 |
2 |
164 |
$$container{'skip_bind'} or $ENV{'DBIX_QUERYLOG_SKIP_BIND'} |
362
|
2 |
0 |
169 |
$$container{'compact'} or $ENV{'DBIX_QUERYLOG_COMPACT'} |
369
|
10 |
1 |
141 |
$s eq ' ' || $s eq "\n" || $s eq "\t" || $s eq "\r" |
|
16 |
4 |
167 |
$s eq q['] or $s eq '"' |
|
20 |
0 |
167 |
$s eq q['] or $s eq '"' or $s eq '`' |
390
|
2 |
2 |
127 |
$s eq ')' || $s eq ',' |
405
|
2 |
0 |
169 |
$$container{'useqq'} or $ENV{'DBIX_QUERYLOG_USEQQ'} |
412
|
1 |
0 |
170 |
$$container{'color'} || $ENV{'DBIX_QUERYLOG_COLOR'} |
418
|
1 |
1 |
169 |
$$container{'show_data_source'} || $ENV{'DBIX_QUERYLOG_SHOW_DATASOURCE'} |