Branch Coverage

inc/IO/Compress/Gzip.pm
Criterion Covered Total %
branch 21 62 33.8


line true false branch
20 1 0 if (defined &utf8::downgrade) { }
92 0 2 if $got->getValue('merge')
99 2 0 unless ($got->parsed('time'))
106 0 2 if ($got->parsed('name') and defined $got->getValue('name'))
109 0 0 if $strict and $name =~ /\x00/
113 0 0 if $strict and $name =~ /$IO::Compress::Gzip::GZIP_FNAME_INVALID_CHAR_RE/o
118 0 2 if ($got->parsed('comment') and defined $got->getValue('comment'))
121 0 0 if $strict and $comment =~ /\x00/
125 0 0 if $strict and $comment =~ /$IO::Compress::Gzip::GZIP_FCOMMENT_INVALID_CHAR_RE/o
130 0 2 if ($got->parsed('os_code'))
133 0 0 if $value < 0 or $value > 255
141 2 0 unless ($got->parsed('extraflags'))
142 0 2 if $got->getValue('level') == Z_BEST_COMPRESSION()
144 0 2 if $got->getValue('level') == Z_BEST_SPEED()
149 0 2 if (defined $data)
151 0 0 if $bad
180 2 0 if IO::Compress::Base::Common::isaScalar($filename)
184 0 0 unless $params->parsed('name')
187 0 0 if not $params->parsed('time')
198 0 2 if $param->getValue('minimal')
205 0 2 if $param->getValue('textflag')
206 0 2 if $param->getValue('headercrc')
207 0 2 if $param->wantValue('extrafield')
208 0 2 if $param->wantValue('name')
209 0 2 if $param->wantValue('comment')
232 0 2 if ($flags & 4)
238 0 2 if ($flags & 8)
243 0 0 if not length $name or substr($name, 1, -1) ne "\000"
249 0 2 if ($flags & 16)
254 0 0 if not length $comment or substr($comment, 1, -1) ne "\000"
260 0 2 if $param->getValue('headercrc')