|  line  | 
 true  | 
 false  | 
 branch  | 
 
| 
26
 | 
 0  | 
 0  | 
 unless $dbh  | 
 
| 
27
 | 
 0  | 
 0  | 
 unless $dbh  | 
 
| 
30
 | 
 0  | 
 0  | 
 $filter ? :  | 
 
| 
 | 
 0  | 
 0  | 
 $add ? :  | 
 
| 
33
 | 
 0  | 
 0  | 
 unless $sth  | 
 
| 
93
 | 
 0  | 
 0  | 
 $filter ? :  | 
 
| 
94
 | 
 0  | 
 0  | 
 unless $dbh->do($sql)  | 
 
| 
99
 | 
 0  | 
 0  | 
 if $param eq 'pseudo'  | 
 
| 
109
 | 
 0  | 
 0  | 
 unless $$self{' zap'}[$i++]  | 
 
| 
113
 | 
 0  | 
 0  | 
 unless $$dbh{'AutoCommit'}  | 
 
| 
144
 | 
 0  | 
 0  | 
 if (defined $_[0]) { }  | 
 
| 
146
 | 
 0  | 
 0  | 
 if $rec < 0 or $rec > @$rs  | 
 
| 
148
 | 
 0  | 
 0  | 
 if $rec == @$rs  | 
 
| 
169
 | 
 0  | 
 0  | 
 if ref $ref  | 
 
| 
210
 | 
 0  | 
 0  | 
 if $$self{' zap'}[$where]  | 
 
| 
218
 | 
 0  | 
 0  | 
 unless $$self{' zap'}[$where]  | 
 
| 
287
 | 
 0  | 
 0  | 
 unless $cmd  | 
 
| 
291
 | 
 0  | 
 0  | 
 unless $pack  | 
 
| 
297
 | 
 0  | 
 0  | 
 !UNIVERSAL::isa($pack, 'CODE') ? :  | 
 
| 
309
 | 
 0  | 
 0  | 
 !(ref($pack) =~ /CODE/) ? :  | 
 
| 
320
 | 
 0  | 
 0  | 
 unless open O, ">$fn"  | 
 
| 
340
 | 
 0  | 
 0  | 
 unless $cmd =~ /[\$\%]1/  | 
 
| 
356
 | 
 0  | 
 0  | 
 if ($s ne $ss)  | 
 
| 
358
 | 
 0  | 
 0  | 
 unless open I, $fn  | 
 
| 
397
 | 
 0  | 
 0  | 
 if $d->spawn  | 
 
| 
409
 | 
 0  | 
 0  | 
 if $fn  | 
 
| 
417
 | 
 0  | 
 0  | 
 if -e $fn  |