| line |
true |
false |
branch |
|
42
|
1 |
6 |
if (@{$args;} != 1) |
|
49
|
0 |
6 |
if lc $_ eq 'stdin' |
|
50
|
1 |
5 |
unless (Path::Tiny::path($_)->is_file) |
|
55
|
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) { } |
|
77
|
0 |
5 |
if (not exists $opt->{'outfile'}) |
|
89
|
0 |
5 |
if (lc $args->[0] eq 'stdin') { } |
|
98
|
3 |
2 |
if ($opt->{'mk'}) { } |
|
132
|
5 |
0 |
if (lc $opt->{'outfile'} eq 'stdout') { } |
|
139
|
3 |
2 |
if ($opt->{'mk'}) { } |