Branch Coverage: lib/Pipeline/Simple.pm

# Branch Coverage

File: | lib/Pipeline/Simple.pm
Coverage: | 69.2%

line | % | coverage | branch
--- | --- | --- | ---
44 | 50 | T | F | @args == 1 ? :
47 | 100 | T | F | if defined $args{'dir'}
53 | 100 | T | F | if $key eq 'config'
54 | 100 | T | F | if $key eq 'dir'
64 | 100 | T | F | if defined $args{'config'}
67 | 50 | T | F | if not $$self{'config'} and defined $self->dir and -e $self->dir . '/config.xml'
71 | 50 | T | F | if not $$self{'config'} and not $self->debug
96 | 100 | T | F | if ($self->dir)
123 | 100 | T | F | if (defined $value)
136 | 100 | T | F | if (defined $value)
144 | 100 | T | F | if (defined $value)
152 | 100 | T | F | if (defined $value)
160 | 100 | T | F | if (defined $value)
168 | 50 | T | F | if (defined $value)
177 | 50 | T | F | if (defined $value)
186 | 100 | T | F | if (defined $value)
194 | 50 | T | F | if (defined $value)
202 | 100 | T | F | if (defined $value)
211 | 50 | T | F | if (defined $value)
220 | 100 | T | F | if (defined $value)
228 | 100 | T | F | if (defined $value)
237 | 50 | T | F | if ($config)
241 | 50 | T | F | unless -e $config
244 | 100 | T | F | if ($self->dir and not -e $self->dir . '/config.xml')
272 | 100 | T | F | unless (ref $$step{'next'} eq 'ARRAY')
280 | 100 | T | F | if $$next{'id'}
286 | 100 | T | F | unless $$nexts{$step->id}
294 | 50 | T | F | if ($self->itype and $self->input)
303 | 0 | T | F | unless $$arg{'key'} eq 'in' and defined $$arg{'type'} and $$arg{'type'} eq $self->itype
324 | 100 | T | F | if ($dir)
325 | 100 | T | F | unless -e $dir and -d $dir
326 | 50 | T | F | unless -e $dir and -d $dir
354 | 50 | T | F | unless ($self->dir)
371 | 50 | T | F | if ($self->start) { }
377 | 50 | T | F | unless &open(my $LOG, '<', $self->dir . '/pipeline.log')
386 | 0 | T | F | if /Run started/
392 | 0 | T | F | unless /\[(\d+)\]/
394 | 0 | T | F | unless /\| (Running|Finished) +\[(\w+)\]/
395 | 0 | T | F | if $1 eq 'Running'
396 | 0 | T | F | if $1 eq 'Finished'
401 | 50 | T | F | if (not @steps and scalar @log > 2) { }
| 50 | T | F | elsif (@steps) { }
424 | 50 | T | F | unless $step
429 | 100 | T | F | unless $$arg{'key'} eq 'in'
430 | 100 | T | F | unless $$arg{'type'} =~ /file|dir/
440 | 50 | T | F | if (defined $$self{'_stop'} and $step->id eq $$self{'_stop'}) { }
463 | 50 | T | F | if (defined $$step{'path'})
465 | 0 | T | F | unless substr($str, -1, 1) eq '/'
474 | 100 | T | F | if (defined $$arg{'type'} and $$arg{'type'} eq 'unnamed')
480 | 100 | T | F | if (defined $$arg{'type'} and $$arg{'type'} eq 'redir')
481 | 100 | T | F | if ($$arg{'key'} eq 'in') { }
| 50 | T | F | elsif ($$arg{'key'} eq 'out') { }
492 | 50 | T | F | if (defined $$arg{'value'}) { }
501 | 100 | T | F | if $display
525 | 100 | T | F | if ($$arg{'key'} eq 'out') { }
| 100 | T | F | elsif ($$arg{'key'} eq 'in' and $$arg{'type'} ne 'redir') { }
527 | 100 | T | F | if $$outputs{$$arg{'value'}}
537 | 50 | T | F | if $prev_step_id ne $step->id and $prev_step_id eq $self->id
561 | 50 | T | F | if ($self->description)
569 | 100 | T | F | if ($step->each_next) { }