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) { } |