line |
true |
false |
branch |
94
|
2 |
369 |
if ($Text::VisualWidth::PP::EastAsian) { } |
113
|
0 |
12 |
if ($] < "5.016") |
175
|
4 |
9 |
if @_ |
186
|
87 |
529 |
if $_[0]{'linebreak'} & 1 |
187
|
83 |
440 |
if $_[0]{'linebreak'} & 2 |
196
|
1848 |
12 |
if (length $_ == 1) { } |
202
|
12 |
12 |
if (@s) { } |
220
|
12 |
35 |
unless (ref $obj) |
223
|
0 |
47 |
if @_ % 2 |
227
|
1 |
70 |
if ($a eq "tabstyle") |
229
|
0 |
1 |
unless my($h, $s) = $b =~ /([-\w]+)/gu |
241
|
0 |
70 |
unless exists $obj->{$a} |
244
|
0 |
47 |
if (ref $obj->{'discard'} eq "ARRAY") |
255
|
138 |
29 |
@reset ? : |
265
|
422 |
194 |
unless (ref $obj) |
271
|
0 |
616 |
unless &looks_like_number($width) |
272
|
10 |
606 |
if $width < 0 |
273
|
0 |
616 |
unless ($width -= $opt->{'margin'}) > 0 |
285
|
328 |
288 |
$opt->{'expand'} ? : |
291
|
0 |
1770 |
if (s/\A(\r*\n)//u) |
296
|
0 |
1770 |
if (s/\A([\f\r]+)//u) |
297
|
0 |
0 |
if length $_ == 0 |
303
|
0 |
1770 |
if (s/\A($osc_re)//u) |
304
|
0 |
0 |
unless $obj->{'discard'}{'OSC'} |
308
|
1 |
1769 |
if (s/\A($erase_re)//u) |
309
|
1 |
0 |
unless $obj->{'discard'}{'EL'} |
314
|
138 |
1631 |
if (s/\A($reset_re+($erase_re*))//u) |
316
|
0 |
138 |
if $2 |
320
|
508 |
1123 |
if $room < 1 |
321
|
8 |
363 |
if $room != $width and &_startWideSpacing and $room < 2 |
323
|
97 |
1018 |
if (@reset) |
328
|
182 |
933 |
if (s/\A($color_re)//u) |
335
|
112 |
821 |
if ($opt->{'expand'} and s/\A\t//u) |
345
|
7 |
832 |
if ($w > $room) |
346
|
4 |
3 |
if ($folded eq '') { } |
357
|
39 |
793 |
if $room < 1 |
359
|
56 |
758 |
if $bs |
361
|
758 |
0 |
if (s/\A(\e*(?:$yield_re(?!\cH))+)//u) { } |
363
|
326 |
432 |
if ((my $w = vwidth($s)) <= $room) |
369
|
0 |
432 |
if ($w > $room and $room < $width) |
383
|
34 |
11 |
if ($word_char_re and my($w2) = /\A( (?: $word_char_re \cH ? ) + )/ux and my($lead, $w1) = $folded =~ /
\A ## avoid CSI final char does not make a word
( (?: [^\e]* $csi_re++ ) *+ .*? )
( (?: $word_char_re \cH ? ) + )
\z /ux) |
395
|
26 |
8 |
$opt->{'prefix'} eq '' ? : |
396
|
29 |
5 |
if ($room + $l < $width - $p and $l + vlength($w2) <= $width - $p) |
406
|
83 |
533 |
if ($_ ne "" and $opt->do_runout) |
407
|
18 |
5 |
if ($folded =~ / (? (?! $reset_re) $color_re*+ )
(?
(?: ($prohibition_re{'end'}) (?: \cH{1,2} \g{-1})* )+
) \z
/pux and ${^PREMATCH} ne "" and (my $w = pwidth($+{'runout'})) <= $opt->{'runout'}) |
417
|
2 |
16 |
if $+{'color'} |
422
|
39 |
577 |
if @reset |
429
|
87 |
529 |
if ($opt->do_runin) |
439
|
0 |
28 |
if ($m -= $w) < 0 |
440
|
2 |
26 |
if ($+{'color'}) |
441
|
2 |
26 |
if ($+{'reset'}) |
446
|
24 |
63 |
if @runin |
449
|
44 |
572 |
if (@color_stack) |
451
|
44 |
0 |
if $_ ne "" |
454
|
12 |
604 |
if ($opt->{'padding'} and $room > 0) |
456
|
1 |
11 |
if (@bg_stack) |
462
|
19 |
597 |
if (length $_ and my $p = $opt->{'prefix'}) |
463
|
4 |
15 |
ref $p eq 'CODE' ? : |
476
|
0 |
432 |
if $width <= 0 |
478
|
0 |
432 |
unless my($left, $right) = $orig =~ /^(\X{0,$width}+)(.*)/u |
485
|
0 |
76 |
unless int(($w - $width) / 2 + "0.5") |
487
|
3 |
73 |
unless $left =~ s/\X \K ( \X{$trim} ) \z//ux |
500
|
6 |
1 |
if (@_ == 0) { } |
503
|
0 |
1 |
if @_ > 1 |
512
|
9 |
56 |
unless defined $_ |
514
|
13 |
43 |
if length $_ == 0 |
525
|
8 |
7 |
if (ref $width eq 'ARRAY') { } |
527
|
2 |
38 |
if ($w == 0) { } |
|
35 |
3 |
elsif ((my $chop = $obj->retrieve('width', $w)) ne '') { } |