Branch Coverage
examples/io/gzip/gzgrep
Criterion
Covered
Total
%
branch
6
10
60.0
line
true
false
branch
7
0
1
unless
@ARGV
>=
1
13
0
1
unless
@ARGV
16
0
2
unless
my
$gz
=
"IO::Uncompress::Gunzip"
->
new
(
$file
)
20
3
12
if
/$pattern/
23
0
2
if
$main::GunzipError