Branch Coverage
blib/lib/App/VirtPerl/Setup.pm
Criterion
Covered
Total
%
branch
1
6
16.6
line
true
false
branch
12
1
0
unless $ENV{'PERL_VIRTPERL_ROOT'} and $ENV{'PERL_VIRTPERL_CURRENT_ENV'}
16
0
0
unless ($current =~ m[^([\w/.-]+)$])
22
0
0
if (-e $current)