| line |
true |
false |
branch |
|
115
|
151 |
0 |
unless utf8::is_utf8($_) |
|
121
|
5 |
42 |
unless $app->getopt |
|
123
|
7 |
35 |
if ($app->colrm) |
|
133
|
0 |
8 |
unless $pos < $start |
|
135
|
5 |
3 |
defined $end ? : |
|
140
|
4 |
3 |
if @width == 0 or $width[-1] ne "" |
|
145
|
0 |
42 |
if ($app->expand > 0) |
|
151
|
84 |
0 |
unless defined $_ and length $_ > 1 |
|
155
|
0 |
42 |
if (my $indent = $app->autoindent) |
|
170
|
18 |
59 |
if (/^$/u) { } |
|
|
59 |
0 |
elsif (/^-?\d+$/u) { } |
|
|
0 |
0 |
elsif (/^(-?[-\d:]+) (?:\{(\d+)\})? $/ux) { } |
|
|
0 |
0 |
elsif (/^(term|tty)$/u) { } |
|
185
|
7 |
35 |
if (@width == 0) { } |
|
|
9 |
26 |
elsif (@width == 1) { } |
|
189
|
5 |
37 |
$_ < 0 ? : |
|
217
|
0 |
42 |
if $app->refill |
|
219
|
0 |
38 |
if (s/\A(\n+)//u) |
|
221
|
0 |
0 |
if length $_ == 0 |
|
224
|
14 |
24 |
s/(\n+)\z//u ? : |
|
225
|
0 |
38 |
if $app->refill |
|
227
|
0 |
38 |
if ($app->{'indent_pat'} and /^$app->{'indent_pat'}/pu) |
|
233
|
26 |
12 |
if @index > 0 |
|
235
|
14 |
24 |
if $chomped |
|
236
|
0 |
38 |
if $app->paragraph > 0 |
|
251
|
0 |
0 |
if (open my $tty, ">", "/dev/tty") |
|
257
|
0 |
0 |
unless $size[0] |