| line |
true |
false |
branch |
|
17
|
0 |
1 |
unless $args |
|
20
|
0 |
1 |
if $self->{'scripture'} |
|
42
|
0 |
0 |
if ($in eq 'help') { } |
|
|
0 |
0 |
elsif ($options{$in}) { } |
|
|
0 |
0 |
elsif ($in =~ /scripture (.*)/) { } |
|
|
0 |
0 |
elsif ($in =~ /chapter (.*)/) { } |
|
|
0 |
0 |
elsif ($in =~ /feather (.*)/) { } |
|
|
0 |
0 |
elsif ($in eq 'exit') { } |
|
58
|
0 |
0 |
if ($in eq 'salvage') { } |
|
85
|
0 |
0 |
unless ($self->{'scripture'}) |
|
93
|
0 |
0 |
if ($_->{'chapter'}) { } |
|
108
|
0 |
1 |
unless -d $path |
|
111
|
0 |
1 |
unless opendir my $dh, $path |
|
113
|
2 |
3 |
if $_ =~ /^\./ |
|
134
|
1 |
0 |
if ($_->[0] =~ /^$name$/) |
|
140
|
0 |
1 |
unless ($scripture) |
|
142
|
0 |
0 |
unless open my $fh, ">", $file |
|
165
|
0 |
2 |
if ($args{'chapter'}) |
|
195
|
0 |
2 |
if $self->{'index'} < 0 |