Condition Coverage

File:/usr/local/share/perl/5.38.2/Capture/Tiny.pm
Coverage:28.0%

line%coveragecondition
18267
ABdec
0X0
100
111
$h eq "stdin" and not $IS_WIN32
2700
ABCdec
00X0
0100
0111
1XX1
_files_exist(@files) or $timeout and time - $start > $timeout
2820
ABdec
000
011
1X1
wait == -1 or time - $start > 30
3120
ABCdec
00X0
0100
0111
1XX1
ref $fh eq "GLOB" or &blessed($fh) and $fh->isa("IO::Seekable")
32833
ABdec
0X0
100
111
tied *STDOUT and &reftype(tied *STDOUT) eq "GLOB"
33033
ABdec
0X0
100
111
tied *STDERR and &reftype(tied *STDERR) eq "GLOB"
33933
ABdec
0X0
100
111
$do_stdout and grep {$_ eq "scalar";} @{$layers{"stdout"};}
34120
ABCdec
00X0
0100
0111
1X00
1X11
$do_stderr || $do_merge and grep {$_ eq "scalar";} @{$layers{"stderr"};}
34233
ABdec
0X0
100
111
tied *STDIN and $] >= "5.008"
34425
ABCdec
0XX0
10X0
1100
1111
$do_stdout and tied *STDOUT and $] >= "5.008"
34614
ABCDdec
00XX0
010X0
01100
01111
1X0X0
1X100
1X111
$do_stderr || $do_merge and tied *STDERR and $] >= "5.008"
36033
ABdec
000
011
1X1
$stash->{'capture'}{$_} ||= "File::Temp"->new
4020
ABCdec
0XX0
1000
1011
11X1
$orig_pid == $$ and defined wantarray || $do_tee && keys %localize
40925
ABCdec
0XX0
10X0
1100
1111
$do_stdout and $do_tee and $localize{'stdout'}
41125
ABCdec
0XX0
10X0
1100
1111
$do_stderr and $do_tee and $localize{'stderr'}
42033
ABdec
0X0
100
111
$do_stderr and not $do_merge