Branch Coverage

blib/lib/Test2/Util.pm
Criterion Covered Total %
branch 23 48 47.9


line true false branch
13 247 0 eval { do { require PerlIO; 'PerlIO'->VERSION(1.02) } } ? :
41 0 247 $^O eq 'MSWin32' ? :
45 0 247 unless $] >= 5.008001
46 247 0 unless $Test2::Util::Config{'useithreads'}
49 0 0 if ($] == 5.01 and $Test2::Util::Config{'ccname'} eq 'gcc' and $Test2::Util::Config{'gccversion'})
51 0 0 if $parts[0] > 4 or $parts[0] == 4 and $parts[1] >= 8
55 0 0 if $INC{'Devel/Cover.pm'}
60 27 0 if $Test2::Util::Config{'d_fork'}
61 0 0 unless $^O eq 'NetWare'
62 0 0 unless $Test2::Util::Config{'useithreads'}
63 0 0 unless $Test2::Util::Config{'ccflags'} =~ /-DPERL_IMPLICIT_SYS/
70 0 247 _can_thread() ? :
74 12 27 if defined $can_fork
78 27 0 $can_fork ? :
83 7 17 if defined $can_really_fork
87 17 0 $can_really_fork ? :
98 1 1 unless eval { do { &$code(@$args); 1 } }
100 0 2 $die ? :
112 11 207 unless eval { do { &$code(@$args); 1 } }
169 247 0 if (_check_for_sig_sys($Test2::Util::Config{'sig_name'})) { }
186 1 1199 if not defined $fileno && length $fileno or $fileno < 0
188 0 1199 unless open my $out, '>&' . $fileno
237 37 0 if rename $from, $to
242 70 0 if unlink $file