| line |
true |
false |
branch |
|
86
|
3 |
2 |
if (exists $args{'ExclusiveStartTableName'}) |
|
87
|
1 |
2 |
unless $self->have_table($args{'ExclusiveStartTableName'}) |
|
96
|
2 |
2 |
if (@tables > $limit) |
|
114
|
1 |
13 |
unless exists $args{'AttributeDefinitions'} |
|
119
|
1 |
12 |
unless exists $args{'KeySchema'} |
|
127
|
1 |
11 |
unless @{$args{'KeySchema'};} |
|
132
|
0 |
11 |
if @{$args{'KeySchema'};} > 2 |
|
134
|
1 |
10 |
unless ($args{'KeySchema'}[0]{'KeyType'} // '') eq 'HASH' |
|
142
|
0 |
10 |
if @{$args{'KeySchema'};} > 1 and ($args{'KeySchema'}[1]{'KeyType'} // '') ne 'RANGE' |
|
150
|
1 |
8 |
unless exists $args{'ProvisionedThroughput'} |
|
155
|
1 |
7 |
unless exists $args{'TableName'} |
|
160
|
1 |
6 |
if $self->have_table($args{'TableName'}) |
|
213
|
1 |
0 |
if (my $throughput = delete $args{'ProvisionedThroughput'}) |
|
216
|
0 |
1 |
if (my $index = delete $args{'GlobalSecondaryIndexUpdates'}) |
|
219
|
0 |
1 |
if keys %args |
|
248
|
0 |
2 |
if keys %args |
|
291
|
1 |
5 |
if defined $k |
|
295
|
1 |
1 |
if $new |
|
327
|
0 |
0 |
if (exists $$self{'data'}{$name}{$id}) |
|
334
|
0 |
0 |
if defined $k |
|
365
|
0 |
0 |
if (exists $$self{'data'}{$name}{$id}) |
|
372
|
0 |
0 |
if defined $k |
|
397
|
6 |
6 |
if exists $args{'name'} |
|
414
|
0 |
1 |
if exists $args{'name'} |
|
416
|
0 |
1 |
unless extract_by sub {
$_->name eq $name;
}
, @{$$self{'tables'};} |
|
417
|
0 |
1 |
unless delete $$self{'table_map'}{$name} |
|
429
|
1 |
1 |
if not defined $v or $v eq 'NONE' |
|
430
|
1 |
0 |
if ($v eq 'ALL_OLD') { } |
|
447
|
2 |
0 |
if not defined $v or $v eq 'NONE' |
|
448
|
0 |
0 |
if ($v eq 'INDEXES') { } |
|
|
0 |
0 |
elsif ($v eq 'TOTAL') { } |
|
467
|
2 |
0 |
if not defined $v or $v eq 'NONE' |
|
468
|
0 |
0 |
if ($v eq 'SIZE') { } |
|
487
|
9 |
2 |
if (defined $status) |
|
488
|
0 |
9 |
unless exists $valid_table_status{$status} |
|
514
|
3 |
23 |
unless defined $name |
|
518
|
5 |
18 |
unless $self->have_table($name) |
|
523
|
6 |
12 |
unless grep(($status eq $_), @allowed) |
|
532
|
0 |
25 |
unless exists $API_METHODS{$sub} |
|
542
|
0 |
20 |
unless defined $sub |
|
543
|
0 |
20 |
unless exists $API_METHODS{$sub} |