Branch Coverage

blib/lib/App/Env.pm
Criterion Covered Total %
branch 156 186 83.8


line true false branch
58 35 160 unless $existsModule{$path}
68 21 4 if (not exists $ENV{'APP_ENV_SITE'} and _existsModule("App::Env::Site"))
70 0 0 ref $@ ? :
0 21 if $@
75 22 3 defined $ENV{'APP_ENV_SITE'} && length $ENV{'APP_ENV_SITE'} ? :
89 14 2 length $site ? :
16 92 defined $site ? :
155 11 31 if (&Scalar::Util::blessed($this) and $this->isa('App::Env')) { }
157 0 11 if @_
168 22 9 if not ref $this and $this eq "App::Env"
171 17 14 unless @_
174 2 12 if (@_ == 1 and "HASH" eq ref $_[0])
191 2 2 if (defined $EnvCache{$cacheid})
212 33 44 'HASH' eq ref $_[-1] ? :
219 75 2 if @_
238 0 2 defined $nopt{'CacheID'} ? :
269 69 6 @apps == 1 && !ref($apps[0]) ? :
275 2 73 if $opts{'Temp'}
288 12 69 if (@apps > 1)
302 1 80 if ("ARRAY" eq ref $app)
304 0 1 unless "HASH" eq ref $opts
309 1 0 if (@apps > 1)
311 0 2 if (exists $app_opt{$iopt})
323 12 69 if (@apps > 1)
355 17 57 if (not $opts{'Force'} and exists $EnvCache{$cacheid}) { }
52 5 elsif (@Apps == 1) { }
358 2 15 if ($opts{'Temp'}) { }
408 5 0 if ($opts{'Cache'})
424 152 683 if @_
458 11 76 if defined $self->_var("id")
468 0 3 unless defined $cache
471 1 2 if ($cache) { }
489 1 22 if ($opt{'All'}) { }
1 21 elsif (defined $opt{'CacheID'}) { }
492 0 1 if grep {defined $_;} values %opt
500 0 1 if grep {defined $_;} values %opt
506 0 21 unless defined $opt{'App'}
536 0 87 if $loop == 10
547 86 1 if (defined $module) { }
549 0 86 unless eval "require $module"
553 6 80 if (my $alias = $module->can("alias"))
555 2 4 if $napp_opts
571 2 5 unless not ref $_[0] or "ARRAY" eq ref $_[0] or "Regexp" eq ref $_[0]
581 5 58 'HASH' eq ref $_[-1] ? :
597 0 5 if $opt{'Exclude'} and wantarray || @_ == 1 && !ref($_[0])
600 40 23 @_ ? :
606 1 62 if (wantarray) { }
33 29 elsif (@_ == 1 and not ref $_[0]) { }
607 2 1 exists $env->{$_} ? :
610 27 6 exists $$env{$vars[0]} ? :
614 590 0 exists $env->{$_} ? :
625 0 9 unless defined $var
628 8 1 if (@_) { }
641 4 1 'HASH' eq ref $_[-1] ? :
654 1 4 @_ ? :
656 5 0 unless (grep {$_ eq "TERMCAP";} @$include)
658 3 2 unless "ARRAY" eq ref $opt{'Exclude'}
695 62 74 unless "ARRAY" eq ref $match
699 58 84 unless defined $spec
701 45 39 if (not ref $spec) { }
37 2 elsif ('Regexp' eq ref $spec) { }
2 0 elsif ('CODE' eq ref $spec) { }
729 12 101 if ($str eq '') { }
747 4 3 if ($self->_opt->{'SysFatal'}) { }
766 1 7 if (wantarray) { }
773 4 4 if ($@ ne "")
774 3 1 if $self->_opt->{'SysFatal'}
778 1 3 wantarray ? :
795 3 2 $self->_opt->{'SysFatal'} ? :
808 3 2 if (wantarray) { }
816 3 2 if $@ ne ""
818 2 0 wantarray ? :
863 5 81 if (exists $self->{'env'}) { }
864 0 5 unless defined $self->{'opt'}
872 0 0 ref $@ ? :
0 81 if $@
881 1 80 unless defined $self->{'module'}
891 16 69 if (exists $App::Env::EnvCache{$self->cacheid} and not $opt{'opt'}{'Force'}) { }
896 5 64 unless $self->{'NoLoad'}
908 80 2 unless defined $cacheid
912 6 76 if (defined $cacheid) { }
913 1 5 $cacheid eq 'AppID' ? :
920 7 69 if defined $self->{'opt'}{'AppOpts'} and keys %{$$self{"opt"}{"AppOpts"};}
924 7 69 if (keys %uniq)
934 7 0 if (defined $ctx)
953 5 62 if exists $self->{'ENV'}
960 0 62 unless $fenvs
965 0 0 ref $@ ? :
0 62 if $@
972 36 26 if $self->{'opt'}{'Cache'}
992 1 1 if exists $App::Env::EnvCache{$cacheid} and $App::Env::EnvCache{$cacheid}{'pid'} eq $self->{'pid'}
997 4 22 @_ > 1 ? :
998 84 231 @_ > 1 ? :