| blib/lib/App/Env.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 30 | 36 | 83.3 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 80 | 32 | 0 | 11 | builtin::blessed($this) and $this->isa(__PACKAGE__) |
| 91 | 0 | 9 | 23 | not ref $this and $this eq __PACKAGE__ |
| 97 | 6 | 6 | 2 | @_ == 1 and "HASH" eq ref $_[0] |
| 192 | 6 | 1 | 74 | @apps == 1 && !ref($apps[0]) |
| 275 | 6 | 56 | 18 | not $opts{'Force'} and defined(my $app = App::Env::_Util::getCacheEntry($cacheid)) |
| 419 | 62 | 7 | 1 | $opt{'Exclude'} and wantarray || @_ == 1 && !ref($_[0]) |
| 435 | 24 | 8 | 35 | @_ == 1 and not ref $_[0] |
| 439 | 1 | 6 | 28 | @vars && exists $$env{$vars[0]} |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 271 | 0 | 80 | 0 | $opts{'CacheId'} // join($;, @cacheids) |
| 419 | 1 | 1 | 6 | wantarray || @_ == 1 && !ref($_[0]) |
| 599 | 4 | 4 | 0 | eval { do { if ($wantarray) { @res = IPC::System::Simple::capture(@_); } else { $res = IPC::System::Simple::capture(@_); } ; 1 } } // do { App::Env::_Util::croak($@) if $self->_opt->{'SysFatal'}; return undef } |
| 642 | 4 | 3 | 0 | eval { do { if ($redirect) { my %redirect; foreach my $stream ("stdout", "stderr") { next unless exists $redirect->{$stream}; my $handle = $redirect->{$stream}; $handle = "IO::File"->new($handle, ">") if ref $handle eq ""; $redirect{$stream} = $handle; } ; &Capture::Tiny::capture($sub, %redirect); $return[0] = $exit; } elsif ($wantarray) { @return = &Capture::Tiny::capture($sub); } else { $return[0] = &Capture::Tiny::capture($sub); } ; 1 } } // App::Env::_Util::croak($@) |