Branch Coverage

blib/lib/Shell/EnvImporter.pm
Criterion Covered Total %
branch 32 46 69.5


line true false branch
64 105 0 if ($self->can($field))
66 52 53 exists $args{$field} ? :
67 0 105 if (ref($curval) =~ /ARRAY/) { }
0 105 elsif (ref($curval) =~ /HASH/) { }
79 0 15 unless my $shellobj = $self->_get_shell
82 3 12 if (defined $self->file)
88 13 2 if $self->auto_run
102 0 15 unless (defined $command)
113 10 4 if ($self->auto_import)
114 1 9 if ($self->import_filter) { }
135 0 12 unless (defined $self->result)
140 0 12 if (ref $_[0]) { }
2 10 elsif (@_) { }
151 1 34 unless $import{$var}
155 13 21 unless $self->$fn
176 0 2 unless (ref $filter)
180 0 2 unless (defined $self->result)
188 3 3 unless &$filter($var, $newval, $type)
210 0 0 unless (defined $self->result)
235 0 86 if $self->debuglevel >= $level
260 0 15 if $@
263 0 15 unless ($shellobj = $shellclass->new('debuglevel', $self->debuglevel))
285 4 20 if ($type eq 'removed') { }