Branch Coverage

lib/Archive/Tar/Constant.pm
Criterion Covered Total %
branch 16 22 72.7


line true false branch
16 8 3 if $^O eq 'MacOS'
35 73 2 if $_[0] % 512
39 38 0 shift @_ ? :
40 6 9 $_[0] ? :
41 21 9 $_[0] =~ /^r/ ? :
46 27 0 unless $getpwuid
47 27 0 unless $getgrgid
60 0 3 $^O eq 'MacOS' ? :
68 3 1 if not $ENV{'PERL5_AT_NO_ZLIB'}
69 0 3 $ENV{'PERL5_AT_NO_ZLIB'} || $@ ? :
73 0 3 if $> == 0 and $^O ne 'MacOS'