line |
true |
false |
branch |
26
|
0 |
2 |
unless $arg{'XPUB'} |
27
|
0 |
2 |
if $arg{'StartIndex'} and $arg{'StartIndex'} =~ /\D/ |
28
|
0 |
2 |
if $arg{'Clobber'} and $arg{'DB'} ne ':memory:' |
31
|
2 |
0 |
unless ($tables[0]) |
32
|
2 |
0 |
if ($arg{'Create'}) { } |
33
|
0 |
2 |
unless $db->do("CREATE TABLE requests (\n\t\t reqid INTEGER PRIMARY KEY AUTOINCREMENT,\n\t\t amount int NOT NULL,\n address text,\n reference text UNIQUE,\n\t\t created int NOT NULL,\n processed int,\n status text\n\t\t );") |
42
|
0 |
2 |
unless $db->do('CREATE INDEX idx_requests_address ON requests(address);') |
43
|
0 |
2 |
unless $db->do('CREATE INDEX idx_requests_reference ON requests(reference);') |
46
|
0 |
2 |
unless $db->do("INSERT INTO SQLITE_SEQUENCE values ('requests',$startindex);") |
57
|
0 |
2 |
unless $arg{'Amount'} =~ /^\d+$/ |
61
|
1 |
1 |
if $startindex == -1 |
73
|
2 |
16 |
if $auto eq 'DESTROY' |
74
|
16 |
0 |
if ($auto =~ /^(xpub|path|db)$/x) |
75
|
0 |
16 |
if defined $_[0] |
77
|
16 |
0 |
if ($auto =~ /^(xpub|path|db|version)$/x) { } |