| line |
true |
false |
branch |
|
40
|
0 |
0 |
unless ref $cli
|
|
41
|
0 |
0 |
if $cli->opened
|
|
48
|
0 |
0 |
unless -d $path or -e "$path/header.json"
|
|
51
|
0 |
0 |
unless $cli->{'db'} = 'DiaColloDB'->new(%dbopts, 'dbdir', $path)
|
|
60
|
0 |
0 |
if $cli->{'db'}
|
|
77
|
0 |
0 |
unless $cli->opened
|
|
79
|
0 |
0 |
unless defined(my $info = $cli->{'db'}->dbinfo(@_))
|
|
94
|
0 |
0 |
unless $cli->opened
|
|
96
|
0 |
0 |
unless defined(my $mp = $cli->{'db'}->profile(@_))
|
|
109
|
0 |
0 |
unless $cli->opened
|
|
111
|
0 |
0 |
unless defined(my $mp = $cli->{'db'}->extend(@_))
|
|
124
|
0 |
0 |
unless $cli->opened
|
|
126
|
0 |
0 |
unless defined(my $mp = $cli->{'db'}->compare(@_))
|