| line |
true |
false |
branch |
|
50
|
1 |
6 |
if (@{$args;} != 1) |
|
57
|
0 |
6 |
if lc $_ eq 'stdin' |
|
58
|
1 |
5 |
unless (Path::Tiny::path($_)->is_file) |
|
63
|
1 |
4 |
if ($opt->{'op'} =~ /^cover/i) { } |
|
|
1 |
3 |
elsif ($opt->{'op'} =~ /^hole/i) { } |
|
|
1 |
2 |
elsif ($opt->{'op'} =~ /^trim/i) { } |
|
|
0 |
2 |
elsif ($opt->{'op'} =~ /^pad/i) { } |
|
|
1 |
1 |
elsif ($opt->{'op'} =~ /^excise/i) { } |
|
|
1 |
0 |
elsif ($opt->{'op'} =~ /^fill/i) { } |
|
85
|
0 |
5 |
if (not exists $opt->{'outfile'}) |
|
97
|
0 |
5 |
if (lc $args->[0] eq 'stdin') { } |
|
106
|
3 |
2 |
if ($opt->{'mk'}) { } |
|
140
|
5 |
0 |
if (lc $opt->{'outfile'} eq 'stdout') { } |
|
147
|
3 |
2 |
if ($opt->{'mk'}) { } |