| line |
true |
false |
branch |
|
19
|
2 |
2 |
$text =~ /$re/s ? : |
|
32
|
3 |
4 |
if ($e =~ /\n/) |
|
36
|
3 |
1 |
if $num_lines == 0 |
|
37
|
0 |
4 |
$is_mb ? : |
|
88
|
0 |
6 |
if ($_ eq "\t") { } |
|
107
|
0 |
10 |
$is_mb ? : |
|
111
|
0 |
10 |
$is_mb ? : |
|
135
|
0 |
237 |
if ($is_mb and $1) { } |
|
|
114 |
123 |
elsif ($3) { } |
|
140
|
0 |
123 |
if ($is_mb) { } |
|
143
|
0 |
0 |
if ($1) { } |
|
157
|
5 |
20 |
unless @s |
|
161
|
20 |
242 |
unless $only_code or defined $s |
|
163
|
5 |
237 |
if ($only_code) |
|
165
|
5 |
0 |
if defined $c |
|
169
|
123 |
119 |
if ($s_type and $s_type ne 's') { } |
|
|
114 |
5 |
elsif (length $s) { } |
|
170
|
111 |
12 |
if ($prev_type eq 's') { } |
|
|
0 |
22 |
elsif ($prev_type and $prev_type ne $s_type) { } |
|
184
|
0 |
0 |
$is_mb ? : |
|
190
|
9 |
114 |
if defined $c and not @s |
|
191
|
8 |
7 |
unless (@s or @ch) |
|
196
|
0 |
8 |
$is_mb ? : |
|
200
|
113 |
1 |
if ($prev_type ne "s") |
|
205
|
0 |
113 |
$is_mb ? : |
|
211
|
3 |
111 |
if defined $c and not @s |
|
212
|
2 |
3 |
unless (@s or @ch) |
|
223
|
25 |
217 |
unless (@s) |
|
224
|
17 |
8 |
if (defined $c and $c =~ /m\z/) |
|
225
|
8 |
9 |
if ($c eq "\e[0m") { } |
|
|
9 |
0 |
elsif ($c =~ /m\z/) { } |
|
233
|
5 |
20 |
if $only_code |
|
244
|
113 |
121 |
if ($termst[$i] eq "s") |
|
245
|
2 |
111 |
if ($pterms[$i] =~ /[ \t]*(\n(?:[ \t]*\n)+)([ \t]*)/) |
|
249
|
2 |
0 |
if ($i < @pterms - 1) |
|
254
|
0 |
2 |
if (length $2) |
|
286
|
0 |
10 |
unless $tw > 0 |
|
288
|
0 |
2 |
$is_mb ? : |
|
|
2 |
8 |
if defined $optfli |
|
290
|
0 |
2 |
$is_mb ? : |
|
|
2 |
8 |
if defined $optsli |
|
301
|
224 |
10 |
if $i |
|
306
|
224 |
10 |
$i > 0 ? : |
|
310
|
2 |
232 |
if ($termt eq "p") |
|
314
|
0 |
4 |
if $crcode and $_ == 1 |
|
315
|
0 |
4 |
if $pad |
|
326
|
12 |
220 |
if ($is_parastart) |
|
327
|
10 |
2 |
unless (defined $fli) |
|
332
|
0 |
10 |
if ($termt eq 's') { } |
|
334
|
0 |
0 |
$is_mb ? : |
|
342
|
8 |
2 |
unless (defined $sli) |
|
345
|
82 |
89 |
if ($termst[$j] eq "s") |
|
346
|
0 |
82 |
if ($pterms[$j] =~ /\n([ \t]+)/) |
|
348
|
0 |
0 |
$is_mb ? : |
|
358
|
0 |
10 |
if $sliw >= $width |
|
368
|
111 |
121 |
if ($termt eq "s") |
|
373
|
2 |
109 |
if ($pterm =~ /\n/ and $i == $#terms) |
|
374
|
0 |
2 |
if $crcode |
|
375
|
0 |
2 |
if $pad |
|
381
|
121 |
111 |
if ($termt ne "s") |
|
394
|
121 |
3 |
if ($termw <= $width - $sliw or $termt eq "c") |
|
398
|
109 |
12 |
$prev_t && $prev_t eq 's' ? : |
|
402
|
0 |
3 |
$is_mb ? : |
|
406
|
3 |
0 |
if ($j == 1) { } |
|
419
|
0 |
0 |
$crcode ? : |
|
429
|
2 |
1 |
$prev_t && $prev_t eq 's' ? : |
|
|
3 |
0 |
$j == 1 ? : |
|
431
|
0 |
3 |
$is_mb ? : |
|
443
|
21 |
103 |
if not defined $maxww or $maxww < $wordw |
|
444
|
14 |
110 |
if not defined $minww or $minww > $wordw |
|
446
|
112 |
12 |
$line_has_word ? : |
|
|
106 |
18 |
if ($x + ($line_has_word ? 1 : 0) + $wordw <= $width) { } |
|
447
|
94 |
12 |
if ($line_has_word and $ws_before) |
|
456
|
0 |
18 |
if ($wordt eq 'c') { } |
|
459
|
0 |
0 |
if ($ws_before) { } |
|
470
|
3 |
15 |
if $crcode |
|
472
|
0 |
18 |
if $pad |
|
473
|
0 |
18 |
if $ws_before and $optkts |
|
479
|
18 |
0 |
if ($sliw + $wordw <= $width) { } |
|
495
|
0 |
10 |
if $line_has_word and $pad |
|
498
|
1 |
9 |
if ($opts->{'return_stats'}) { } |
|
518
|
3 |
4 |
if ($which) { } |
|
525
|
0 |
7 |
$is_mb ? : |
|
526
|
1 |
6 |
if ($is_trunc and $w > $width) { } |
|
527
|
0 |
1 |
$is_mb ? : |
|
531
|
1 |
5 |
if ($which eq 'l') { } |
|
|
1 |
4 |
elsif ($which eq 'c') { } |
|
537
|
3 |
1 |
if $width > $w |
|
558
|
0 |
16 |
$is_mb ? : |
|
559
|
2 |
14 |
if ($w <= $width) |
|
560
|
0 |
2 |
$return_extra ? : |
|
572
|
32 |
13 |
if ($append) { } |
|
573
|
0 |
32 |
$is_mb ? : |
|
575
|
22 |
10 |
if ($w + $tw <= $width) { } |
|
579
|
4 |
18 |
if $w == $width |
|
582
|
0 |
10 |
$is_mb ? : |
|
596
|
39 |
6 |
if (defined $ansi) |
|
597
|
18 |
21 |
if ($append) { } |
|
598
|
1 |
17 |
if ($ansi eq "\e[0m") { } |
|
619
|
10 |
4 |
if ($return_extra) { } |
|
653
|
8 |
0 |
if (defined $c and $c =~ /m\z/) |
|
654
|
2 |
6 |
if ($c eq "\e[0m") { } |
|
|
6 |
0 |
elsif ($c =~ /m\z/) { } |
|
665
|
0 |
2 |
if (ref $needle eq 'Regexp') { } |
|
667
|
0 |
0 |
unless @m |
|
673
|
0 |
0 |
if $p >= 0 |
|
675
|
0 |
0 |
unless @pt |
|
679
|
0 |
0 |
if ($pmin > $_->[0] or $pmin == $_->[0] and length $t < length $_->[1]) |
|
687
|
0 |
0 |
unless $is_all |
|
695
|
1 |
3 |
if $p < 0 |
|
698
|
1 |
2 |
unless $is_all |
|
700
|
0 |
2 |
if $pos >= length $plaintext |
|
702
|
0 |
2 |
unless @needle |
|
714
|
2 |
9 |
if $i >= @chptext |
|
718
|
4 |
5 |
if ($pos > $npos2 or $pos2 < $npos or not $found) |
|
722
|
4 |
0 |
if defined $chcode[$i] |
|
727
|
3 |
2 |
if ($pos < $npos) |
|
736
|
5 |
0 |
if (length $npart) |
|
745
|
3 |
2 |
if ($npos2 <= $pos2) |
|
749
|
1 |
2 |
if (@needle) { } |
|
762
|
2 |
0 |
unless ($found) |
|
765
|
2 |
0 |
if defined $chcode[$i] |
|
793
|
1 |
3 |
$i > 1 && !$savedc ? : |
|
799
|
3 |
4 |
if (defined $c and $c =~ /m\z/) |
|
801
|
1 |
2 |
if ($c eq "\e[0m") { } |
|
|
2 |
0 |
elsif ($c =~ /m\z/) { } |
|
809
|
2 |
2 |
if $savedc and $i < @text |
|
825
|
2 |
1 |
if (@_) { } |