line |
true |
false |
branch |
77
|
0 |
2 |
if (ref $chk eq 'CODE') |
88
|
2 |
31 |
unless $chunk =~ /./so or $mc =~ /./so |
90
|
11 |
20 |
if ($chunk =~ /./so) |
93
|
0 |
31 |
if ($chunk =~ /./so) |
98
|
29 |
2 |
if ($mc =~ /./so) |
104
|
0 |
0 |
if ($chk & $DIE_ON_ERR) |
107
|
0 |
0 |
if ($chk & $WARN_ON_ERR) |
110
|
0 |
0 |
if ($chk & $RETURN_ON_ERR) |
114
|
0 |
0 |
if ($chk_sub) { } |
|
0 |
0 |
elsif ($chk & $XMLCREF) { } |
|
0 |
0 |
elsif ($chk & $HTMLCREF) { } |
126
|
2 |
0 |
unless $chk & $LEAVE_SRC |
134
|
0 |
2 |
if (ref $chk eq 'CODE') |
143
|
2 |
0 |
unless length $str |
146
|
0 |
0 |
if ($str =~ /^([\x81-\x9F\xE0-\xFC][\x40-\x7E\x80-\xFC])/) { } |
151
|
0 |
0 |
if ($chk & $DIE_ON_ERR) |
154
|
0 |
0 |
if ($chk & $WARN_ON_ERR) |
157
|
0 |
0 |
if ($chk & $RETURN_ON_ERR) |
162
|
0 |
0 |
if ($chk_sub) { } |
|
0 |
0 |
elsif ($chk & $PERLQQ) { } |
170
|
2 |
0 |
unless $chk & $LEAVE_SRC |