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) |