Branch Coverage

blib/lib/DBIx/Counter.pm
Criterion Covered Total %
branch 0 10 0.0


line true false branch
23 0 0 unless my $countername = shift()
24 0 0 if @_ % 2
37 0 0 unless $$self{'dbh'} or $$self{'dsn'}
50 0 0 unless eval { do { my $dbh = $self->_db; my($exists) = $dbh->selectrow_array("select count(*) from $$self{'tablename'} where counter_id=?", undef, $$self{'countername'}); unless ($exists > 0) { $dbh->do("insert into $$self{'tablename'} (counter_id,value) values (?,?)", undef, $$self{'countername'}, $$self{'initial'}); } } }
53 0 0 unless ($exists > 0)