line |
true |
false |
branch |
94
|
2 |
372 |
if ($Text::VisualWidth::PP::EastAsian) { } |
113
|
0 |
12 |
if ($] < "5.016") |
175
|
4 |
9 |
if @_ |
186
|
87 |
539 |
if $_[0]{'linebreak'} & 1 |
187
|
83 |
447 |
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 |
31 |
@reset ? : |
264
|
429 |
197 |
unless (ref $obj) |
270
|
0 |
626 |
unless &looks_like_number($width) |
271
|
10 |
616 |
if $width < 0 |
272
|
0 |
626 |
unless ($width -= $opt->{'margin'}) > 0 |
284
|
328 |
298 |
$opt->{'expand'} ? : |
290
|
0 |
1788 |
if (s/\A(\r*\n)//u) |
295
|
0 |
1788 |
if (s/\A([\f\r]+)//u) |
296
|
0 |
0 |
if length $_ == 0 |
302
|
0 |
1788 |
if (s/\A($osc_re)//u) |
303
|
0 |
0 |
unless $obj->{'discard'}{'OSC'} |
307
|
1 |
1787 |
if (s/\A($erase_re)//u) |
308
|
1 |
0 |
unless $obj->{'discard'}{'EL'} |
313
|
138 |
1649 |
if (s/\A($reset_re+($erase_re*))//u) |
315
|
0 |
138 |
if $2 |
319
|
513 |
1136 |
if $room < 1 |
320
|
10 |
364 |
if $room != $width and &_startWideSpacing and $room < 2 |
322
|
97 |
1029 |
if (@reset) |
327
|
182 |
944 |
if (s/\A($color_re)//u) |
334
|
112 |
832 |
if ($opt->{'expand'} and s/\A\t//u) |
344
|
7 |
832 |
if ($w > $room) |
345
|
4 |
3 |
if ($folded eq '') { } |
356
|
39 |
793 |
if $room < 1 |
358
|
56 |
769 |
if $bs |
360
|
769 |
0 |
if (s/\A(\e+|(?:$yield_re(?!\cH))+)//u) { } |
362
|
330 |
439 |
if ((my $w = vwidth($s)) <= $room) |
368
|
0 |
439 |
if ($w > $room and $room < $width) |
382
|
36 |
16 |
if ($word_char_re and my($w2) = /\A( (?: $word_char_re \cH ? ) + )/ux and my($lead, $w1) = $folded =~ /
\A ## avoid CSI final char making a word
( (?: [^\e]* $csi_re++ ) *+ .*? )
( (?: $word_char_re \cH ? ) + )
\z /ux) |
394
|
28 |
8 |
$opt->{'prefix'} eq '' ? : |
395
|
31 |
5 |
if ($room + $l < $width - $p and $l + pwidth($w2) <= $width - $p) |
405
|
83 |
543 |
if ($_ ne "" and $opt->do_runout) |
406
|
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'}) |
416
|
2 |
16 |
if $+{'color'} |
421
|
39 |
587 |
if @reset |
428
|
87 |
539 |
if ($opt->do_runin) |
438
|
0 |
28 |
if ($m -= $w) < 0 |
439
|
2 |
26 |
if ($+{'color'}) |
440
|
2 |
26 |
if ($+{'reset'}) |
445
|
24 |
63 |
if @runin |
448
|
44 |
582 |
if (@color_stack) |
450
|
44 |
0 |
if $_ ne "" |
453
|
12 |
614 |
if ($opt->{'padding'} and $room > 0) |
455
|
1 |
11 |
if (@bg_stack) |
461
|
19 |
607 |
if (length $_ and my $p = $opt->{'prefix'}) |
462
|
4 |
15 |
ref $p eq 'CODE' ? : |
475
|
0 |
439 |
if $width <= 0 |
477
|
0 |
439 |
unless my($left, $right) = $orig =~ /^(\X{0,$width}+)(.*)/u |
484
|
0 |
86 |
unless int(($w - $width) / 2 + "0.5") |
486
|
3 |
83 |
unless $left =~ s/\X \K ( \X{$trim} ) \z//ux |
499
|
6 |
1 |
if (@_ == 0) { } |
502
|
0 |
1 |
if @_ > 1 |
511
|
9 |
56 |
unless defined $_ |
513
|
13 |
43 |
if length $_ == 0 |
524
|
8 |
7 |
if (ref $width eq 'ARRAY') { } |
526
|
2 |
38 |
if ($w == 0) { } |
|
35 |
3 |
elsif ((my $chop = $obj->retrieve('width', $w)) ne '') { } |