| line |
true |
false |
branch |
|
27
|
0 |
0 |
if ref $class |
|
29
|
0 |
0 |
unless $class->can_highlight and length $string |
|
33
|
0 |
0 |
unless (defined $pid) |
|
39
|
0 |
0 |
unless ($pid) |
|
40
|
0 |
0 |
unless open my $hl_in, '|-', 'highlight', '-O', 'ansi', '-S', $class->lang |
|
42
|
0 |
0 |
if utf8::is_utf8($string) |
|
51
|
0 |
0 |
unless $? == 0 |
|
52
|
0 |
0 |
if $utf8 and not utf8::is_utf8($highlighted) |
|
64
|
48 |
24 |
unless @_ |
|
73
|
1 |
4 |
unless $class->need_change_depth and $self->max_depth |
|
82
|
0 |
4 |
if ($@ or not defined $VAR1) { } |
|
99
|
0 |
0 |
if $self->color and $class->can_highlight |
|
100
|
0 |
0 |
if utf8::is_utf8($out) |
|
101
|
0 |
0 |
unless $out =~ /\n\z/u |