| line |
true |
false |
branch |
|
19
|
5 |
23 |
if ($data)
|
|
20
|
0 |
5 |
unless 'HASH' eq ref $data
|
|
23
|
28 |
0 |
if $_config
|
|
25
|
0 |
0 |
if (-f 'config.yaml') { }
|
|
|
0 |
0 |
elsif (-f 'config.yml') { }
|
|
40
|
0 |
0 |
if exists $_config->{$schema_name}
|
|
41
|
0 |
0 |
unless 'HASH' eq ref $schema_data
|
|
53
|
10 |
13 |
unless (defined $name)
|
|
54
|
0 |
10 |
unless my(@names) = keys %{$cfg;}
|
|
58
|
5 |
5 |
@names == 1 ? :
|
|
61
|
3 |
20 |
unless my $options = $cfg->{$name}
|
|
65
|
1 |
19 |
if ($schema_cfg)
|
|
71
|
11 |
8 |
if $_schemas->{$name}
|
|
74
|
2 |
6 |
if (my $alias = $options->{'alias'})
|
|
75
|
1 |
1 |
unless $options = $cfg->{$alias}
|
|
77
|
1 |
0 |
if $_schemas->{$alias}
|
|
97
|
0 |
7 |
$options->{'connect_info'} ? :
|
|
98
|
0 |
7 |
if (exists $options->{'pass'})
|
|
105
|
6 |
1 |
if (my $schema_class = $options->{'schema_class'}) { }
|
|
108
|
0 |
6 |
if $@
|
|
109
|
0 |
6 |
if (my $replicated = $options->{'replicated'}) { }
|
|
115
|
0 |
0 |
if defined $value
|
|
126
|
0 |
1 |
if $@
|