| line |
true |
false |
branch |
|
203
|
0 |
0 |
if (defined wantarray) { }
|
|
|
0 |
0 |
if (defined wantarray) { }
|
|
|
0 |
0 |
if (defined wantarray) { }
|
|
|
3 |
0 |
if $args{'decode_eol'}
|
|
|
3 |
0 |
if (defined $_ and not utf8::is_utf8($_))
|
|
|
5 |
0 |
if $args{'decode_eol'}
|
|
|
5 |
0 |
if (defined $_ and not utf8::is_utf8($_))
|
|
|
3 |
5 |
if (defined wantarray) { }
|
|
|
0 |
0 |
if (defined wantarray) { }
|
|
|
0 |
0 |
if (defined wantarray) { }
|
|
|
0 |
0 |
if (defined wantarray) { }
|
|
|
0 |
0 |
if (defined wantarray) { }
|
|
|
0 |
0 |
if utf8::is_utf8($_)
|
|
|
0 |
0 |
if utf8::is_utf8($_)
|
|
|
0 |
0 |
if (defined wantarray) { }
|
|
|
0 |
0 |
if (defined wantarray) { }
|
|
|
0 |
0 |
if (defined wantarray) { }
|
|
|
0 |
0 |
if (defined wantarray) { }
|
|
|
0 |
0 |
if (defined wantarray) { }
|
|
|
0 |
0 |
if (defined wantarray) { }
|
|
|
0 |
0 |
if (defined wantarray) { }
|
|
|
0 |
0 |
if (defined wantarray) { }
|
|
|
0 |
0 |
if (defined wantarray) { }
|
|
|
0 |
0 |
if (defined wantarray) { }
|
|
|
0 |
0 |
if (defined wantarray) { }
|
|
|
495 |
147 |
if (defined wantarray) { }
|
|
|
0 |
0 |
if (defined wantarray) { }
|
|
214
|
0 |
0 |
if (defined wantarray) { }
|
|
229
|
0 |
0 |
if (defined wantarray) { }
|
|
245
|
0 |
0 |
unless (defined $args{'bin'})
|
|
246
|
0 |
0 |
if (utf8::is_utf8($_)) { }
|
|
|
0 |
0 |
elsif (/[[:^ascii:]]/msu) { }
|
|
258
|
0 |
0 |
if ($args{'bin'}) { }
|
|
259
|
0 |
0 |
if (utf8::is_utf8($_)) { }
|
|
260
|
0 |
0 |
if ($args{'utf8_encode'}) { }
|
|
278
|
0 |
0 |
$args{'esc_color'} ? :
|
|
285
|
0 |
0 |
if (defined wantarray) { }
|
|
301
|
0 |
0 |
unless $args{'ansi'}
|
|
310
|
0 |
0 |
if ($ansi) { }
|
|
319
|
0 |
0 |
if ($ansi and $word =~ /\e.+?m/msu) { }
|
|
|
0 |
0 |
elsif ($buf_len + length($word) > $width) { }
|
|
328
|
0 |
0 |
if $buf ne ''
|
|
344
|
0 |
0 |
if $buf ne ''
|
|
357
|
0 |
0 |
if ($args{'ansi'})
|
|
363
|
0 |
0 |
if (my(@ansi) = $line =~ /(\e.+?m)/gmsu) { }
|
|
|
0 |
0 |
elsif ($cur_ansi_prefix) { }
|
|
364
|
0 |
0 |
if ($ansi[-1] ne "\e[0m") { }
|
|
375
|
0 |
0 |
if $cur_ansi_prefix
|
|
380
|
0 |
0 |
if (defined $args{'align'} != -1)
|
|
382
|
0 |
0 |
$args{'ansi'} ? :
|
|
384
|
0 |
0 |
if $len == $width
|
|
386
|
0 |
0 |
if ($args{'align'} == -1) { }
|
|
|
0 |
0 |
elsif ($args{'align'} == 1) { }
|
|
|
0 |
0 |
elsif ($args{'align'} == 0) { }
|
|
417
|
0 |
0 |
if (defined wantarray) { }
|
|
435
|
0 |
0 |
if $args{'trim'}
|
|
437
|
0 |
0 |
if (defined wantarray) { }
|
|
447
|
0 |
0 |
unless $num =~ /\A(.*)e([-+]?)(.*)\z/msu
|
|
451
|
0 |
0 |
$sign eq '-' ? :
|
|
458
|
0 |
0 |
$num =~ s/\A([^\d])//msu ? :
|
|
460
|
0 |
0 |
$num =~ s/[.](\d+)\z//msu ? :
|
|
464
|
0 |
0 |
if $fraction
|
|
472
|
0 |
0 |
if (defined wantarray) { }
|
|
486
|
0 |
0 |
if ($args{'split'}) { }
|
|
495
|
0 |
0 |
if ($args{'join'}) { }
|
|
510
|
0 |
0 |
if (defined wantarray) { }
|
|
521
|
0 |
0 |
if (defined wantarray) { }
|
|
536
|
0 |
0 |
if ($args{'split'}) { }
|
|
544
|
0 |
0 |
if $args{'ucfirst'}
|
|
547
|
0 |
0 |
if ($args{'join'}) { }
|
|
559
|
0 |
0 |
if $args{'ucfirst'}
|
|
562
|
0 |
0 |
if (defined wantarray) { }
|