line |
!l |
l&&!r |
l&&r |
condition |
26
|
36 |
2 |
0 |
$opts{'join'} and not $opts{'db_file'} |
29
|
33 |
5 |
0 |
$opts{'file'} and not $opts{'db_file'} |
39
|
2 |
34 |
2 |
not $opts{'join'} and -f $opts{'db_file'} |
43
|
36 |
0 |
2 |
$opts{'join'} && -f $opts{'db_file'} |
60
|
34 |
2 |
0 |
$z1 and not $z2 |
151
|
2 |
12 |
28055 |
$self->{'_dbh'} and $$ == $self->{'_pid'}[0] |
|
14 |
0 |
28055 |
$self->{'_dbh'} and $$ == $self->{'_pid'}[0] and $tid == $self->{'_pid'}[1] |
191
|
0 |
0 |
34 |
$dbh && eval {
do {
$dbh->{'PrintWarn'} = $dbh->{'PrintError'} = 0;
$dbh->begin_work;
my $z1 = _try(3, sub {
$dbh->do("DELETE FROM pids WHERE pid=$$ AND tid=$tid");
}
);
if ($z1) {
my $sth = $dbh->prepare('SELECT COUNT(*) FROM pids');
my $z2 = $sth->execute;
$t = $sth->fetchall_arrayref;
}
else {
print STDERR "$$ DESTROY: DELETE FROM pids failed\n" if $_DEBUG;
$t = [[-2]];
};
$dbh->commit;
print STDERR "$$ DESTROY npids=$t->[0][0]\n" if $_DEBUG;
1
}
} |
212
|
0 |
0 |
34 |
$t and $t->[0] |
|
0 |
11 |
23 |
$t and $t->[0] and $t->[0][0] == 0 |
226
|
22405 |
0 |
0 |
not $dbh and $self->{'_DESTROY'} |
229
|
22197 |
0 |
0 |
not $sth and $self->{'_DESTROY'} |
252
|
0 |
0 |
208 |
$z1 && _try(5, sub {
$sth2->execute($key, $value);
}
) |
395
|
0 |
0 |
2 |
@items and $self->_avail < $limit |
462
|
125 |
21 |
1276 |
@items and $self->_avail < $limit |
531
|
3 |
0 |
0 |
$self->limit > 0 and $count > $self->limit |
699
|
6 |
2 |
24 |
@items and $self->_avail < $limit |
749
|
69 |
48 |
0 |
$lo > 0 and $block |
760
|
47 |
0 |
70 |
$purge && $dbh->prepare('DELETE FROM the_queue WHERE item=? AND timestamp=? AND batchid=?') |
770
|
0 |
0 |
19936 |
$sths && $sths->execute($limit) |
771
|
0 |
0 |
19936 |
$sths && $sths->fetchall_arrayref |
772
|
19936 |
0 |
0 |
$lo < 0 and -$lo > @$tt |
776
|
108 |
0 |
19814 |
$block > 1 and $lo == 0 |
|
108 |
2 |
19812 |
$block > 1 and $lo == 0 and @$tt < $hi |
847
|
0 |
0 |
0 |
$block and $self->_wait_for_item |
937
|
68 |
0 |
17 |
defined $candidate and $candidate ne '' |
|
68 |
0 |
17 |
defined $candidate and $candidate ne '' and -d $candidate |
|
0 |
0 |
17 |
defined $candidate and $candidate ne '' and -d $candidate and -w _ |
|
0 |
0 |
17 |
defined $candidate and $candidate ne '' and -d $candidate and -w _ and -x _ |