Branch Coverage

blib/lib/String/Tagged/Terminal.pm
Criterion Covered Total %
branch 99 120 82.5


line true false branch
123 1 0 $_[1] ? :
163 41 40 if ($s =~ /\G([^\e]+)/cgu) { }
37 3 elsif ($s =~ /\G\e\[($CSI_args)m/cgu or $s =~ /\G\x9b($CSI_args)m/cgu) { }
2 1 elsif ($s =~ /\G\e]8;/cgu or $s =~ /\G\x{9d}8;/cgu) { }
168 16 21 unless length $args
173 18 19 if ($a0 == 0) { }
3 16 elsif ($a0 == 1) { }
0 16 elsif ($a0 == 22) { }
1 15 elsif ($a0 == 4) { }
0 15 elsif ($a0 == 24) { }
1 14 elsif ($a0 == 3) { }
0 14 elsif ($a0 == 23) { }
1 13 elsif ($a0 == 9) { }
0 13 elsif ($a0 == 29) { }
1 12 elsif ($a0 == 5) { }
0 12 elsif ($a0 == 25) { }
1 11 elsif ($a0 == 7) { }
0 11 elsif ($a0 == 27) { }
1 10 elsif ($a0 >= 10 and $a0 <= 19) { }
7 3 elsif ($a0 >= 30 and $a0 <= 39 or $a0 >= 90 and $a0 <= 97 or $a0 >= 40 and $a0 <= 49 or $a0 >= 100 and $a0 <= 107) { }
1 2 elsif ($a0 == 73) { }
1 1 elsif ($a0 == 74) { }
0 1 elsif ($a0 == 75) { }
191 1 0 if ($a0 > 10) { }
197 2 5 $a0 >= 90 ? :
2 5 if $hi
198 4 3 $a0 < 40 ? :
201 0 7 if ($a0 == 9) { }
1 6 elsif ($a0 == 8) { }
203 1 0 if (@arest >= 2 and $arest[0] == 5)
223 0 0 unless $s =~ /\G(.*?)\e\\/cgu or $s =~ /\G(.*?)\x07/cgu or $s =~ /\G(.*?)\x9c/cgu
227 1 1 if (length $1) { }
293 14 448 if $tags{$tag} and not $pen{$tag}
294 13 435 if not $tags{$tag} and $pen{$tag}
303 3 74 if (defined $pen{$tag} and not defined $tags{$tag}) { }
0 74 elsif (defined $pen{$tag} and defined $tags{$tag} and $pen{$tag} == $tags{$tag}) { }
3 71 elsif (defined $tags{$tag}) { }
312 0 3 if $val > $max
325 14 140 if defined $val
327 2 152 if (defined $pen{$tag} and not defined $val) { }
0 152 elsif (defined $pen{$tag} and defined $val and $pen{$tag} == $val) { }
14 138 elsif (defined $val) { }
336 9 5 if ($val < 8) { }
3 2 elsif ($val < 16) { }
353 1 76 if (defined $pen{'sizepos'} and not defined $tags{'sizepos'}) { }
0 76 elsif (defined $pen{'sizepos'} and defined $tags{'sizepos'} and $pen{'sizepos'} eq $tags{'sizepos'}) { }
4 72 elsif (defined(my $val = $tags{'sizepos'})) { }
361 2 2 if ($val eq 'sub') { }
2 0 elsif ($val eq 'super') { }
373 2 75 $link ? :
375 0 77 if (defined $osc8_uri and not defined $uri) { }
0 77 elsif (defined $osc8_uri and defined $uri and $osc8_uri eq $uri) { }
2 75 elsif (defined $uri) { }
388 35 42 if (@sgr and %pen) { }
19 23 elsif (@sgr) { }
397 1 31 $opts{'no_color'} ? :
399 13 19 if %pen
400 2 30 if defined $osc8_uri
427 1 0 $_[1] == 1 ? :
460 3 2 if ($options{'win32'}) { }