Branch Coverage

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


line true false branch
104 3 26 if ($input =~ /^\s*\
131 0 51 if (defined $prev_input and $input eq $prev_input)
138 13 38 if ($input =~ /^\\([0-7]{1,3})(.*)/so) { }
9 29 elsif ($input =~ /^\\([nrtbf\\\(\)])(.*)/iso) { }
5 24 elsif ($input =~ /^\\$cr(.*)/so) { }
2 22 elsif ($input =~ /^\015\012?(.*)/so) { }
10 12 elsif ($input =~ /^(.*?)((?:\\(?:[nrtbf\\\(\)0-7]|$cr)|\015\012?).*)/so) { }
192 1 137 if ($self->{' ishex'}) { }
1 136 elsif ($self->{' isutf'} or utf8::is_utf8($str) and $str =~ /[^[:ascii:]]/) { }
201 3 133 if ($str =~ /[^\n\r\t\b\f\040-\176\200-\377]/) { }