blib/lib/IO/Compress/Gzip.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 24 | 27 | 88.8 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
106 | 362 | 1 | 80 | $got->parsed("name") and defined $got->getValue("name") |
109 | 5 | 73 | 2 | $strict and $name =~ /\x00/ |
113 | 5 | 72 | 1 | $strict and $name =~ /$IO::Compress::Gzip::GZIP_FNAME_INVALID_CHAR_RE/o |
118 | 401 | 1 | 38 | $got->parsed("comment") and defined $got->getValue("comment") |
121 | 5 | 31 | 2 | $strict and $comment =~ /\x00/ |
125 | 5 | 30 | 1 | $strict and $comment =~ /$IO::Compress::Gzip::GZIP_FCOMMENT_INVALID_CHAR_RE/o |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
133 | 0 | 1 | 5 | $value < 0 or $value > 255 |
244 | 7 | 79 | 0 | not length $name or substr($name, 1, -1) ne "\0" |
255 | 1 | 52 | 0 | not length $comment or substr($comment, 1, -1) ne "\0" |