| line |
true |
false |
branch |
|
13
|
2 |
1 |
'Term::ANSIColorx::ColorNicknames'->can('import') ? : |
|
18
|
0 |
6 |
if (/\Acolor.?package\s*=\s*(\S+)\z/) { } |
|
31
|
0 |
3 |
unless eval " use $color_package qw(color colorvalid); 1 " |
|
54
|
0 |
5 |
if ($pf2t{$pfft} == $this) |
|
71
|
0 |
2 |
unless $that > 0 |
|
92
|
0 |
52 |
if ($icolors[$p->[1]] eq '_hashed_') { } |
|
121
|
102 |
224 |
if ((my $n = $colors[$i]) != $l) |
|
128
|
2 |
1 |
if $colors[0] |
|
131
|
2 |
1 |
if (my $trun = $trun{$this}) |
|
136
|
2 |
0 |
if length $line > $trun + 1 |
|
148
|
0 |
5 |
unless ref $fh eq "GLOB" |
|
155
|
5 |
0 |
if $RESET eq "\e[0m" |
|
159
|
0 |
8 |
unless defined $color |
|
161
|
0 |
8 |
if ($color eq "_hashed_") |
|
167
|
3 |
5 |
unless (ref $pat eq "Regexp") |
|
169
|
0 |
3 |
unless $pat |
|
175
|
1 |
7 |
unless &colorvalid($color) |
|
180
|
6 |
1 |
unless ($l) |
|
191
|
0 |
4 |
unless my $this = tie(*{$pfft;}, "Term::ANSIColorx::AutoFilterFH") |
|
216
|
0 |
0 |
if $list |
|
223
|
0 |
0 |
unless ($l) |