Branch Coverage

blib/lib/PDF/Builder/Basic/PDF/String.pm
Criterion Covered Total %
branch 19 20 95.0


line true false branch
106 3 27 if ($input =~ /^\s*\
133 0 52 if (defined $prev_input and $input eq $prev_input)
140 13 39 if ($input =~ /^\\([0-7]{1,3})(.*)/so) { }
9 30 elsif ($input =~ /^\\([nrtbf\\\(\)])(.*)/iso) { }
5 25 elsif ($input =~ /^\\$cr(.*)/so) { }
2 23 elsif ($input =~ /^\015\012?(.*)/so) { }
10 13 elsif ($input =~ /^(.*?)((?:\\(?:[nrtbf\\\(\)0-7]|$cr)|\015\012?).*)/so) { }
194 1 194 if ($self->{' ishex'}) { }
1 193 elsif ($self->{' isutf'} or utf8::is_utf8($str) and $str =~ /[^[:ascii:]]/) { }
203 3 190 if ($str =~ /[^\n\r\t\b\f\040-\176\200-\377]/) { }