| blib/lib/DBIx/CouchLike.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 0 | 34 | 0.0 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 85 | 0 | 0 | 0 | $self->table and $self->dbh |
| 227 | 0 | 0 | 0 | $versioning and $put |
| line | l | !l | condition |
|---|---|---|---|
| 167 | 0 | 0 | $$value_ref{'_version'} ||= 0 |
| 219 | 0 | 0 | $$value_ref{'_version'} ||= 0 |
| 270 | 0 | 0 | shift() || {} |
| 365 | 0 | 0 | shift() || {} |
| 504 | 0 | 0 | shift() || [] |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 24 | 0 | 0 | 0 | $$self{'utf8'} or $RD |
| 40 | 0 | 0 | 0 | $$self{'utf8'} or $RD |
| 64 | 0 | 0 | 0 | $$self{'id_generator'} ||= do { my $gen; eval { do { require Data::YUID::Generator; $gen = 'Data::YUID::Generator'->new } }; unless ($gen) { require DBIx::CouchLike::IdGenerator; $gen = 'DBIx::CouchLike::IdGenerator'->new; }; $gen } |
| 143 | 0 | 0 | 0 | delete $_[0]{'_id'} || $self->id_generator->get_id |
| 166 | 0 | 0 | 0 | delete $$value_ref{'_id'} || $self->id_generator->get_id |
| 242 | 0 | 0 | 0 | $id[0] || $new_id[0] |