Branch Coverage

lib/Schedule/SGELK.pm
Criterion Covered Total %
branch 29 124 23.3


line true false branch
74 0 1 unless @jobsToClean
133 3 4 unless defined $self->settings($key)
135 0 1 unless ($self->get("workingdir"))
144 3 0 if $?
148 3 0 unless $exec
152 0 1 if ($ENV{'SGE_ROOT'} and -e $ENV{'SGE_ROOT'}) { }
162 1 0 if $self->get("noqsub")
183 0 0 unless defined $msg
186 0 0 if defined $exit_code
205 18 19 if (defined $key and defined $value) { }
17 2 elsif (defined $key) { }
210 0 20 if wantarray
252 2 0 unless defined $tmpSettings
261 0 2 if $cmd =~ /^\s*$/
270 0 2 $0 eq '-e' ? :
275 0 2 unless open SCRIPT, ">", $script
287 0 2 if (my $opts = $settings{'qsubxopts'})
314 0 2 if $?
320 2 0 unless ($settings{'scheduler'})
322 0 2 if $has_threads
323 0 2 if $has_threads
324 2 0 unless $self->settings("keep")
327 0 2 if wantarray
333 0 0 if ($out =~ /Your job (\d+)/) { }
336 0 0 if $settings{'verbose'}
344 0 0 unless $self->settings("waitForEachJobToStart")
346 0 0 if time - $started > $settings{'timeout'}
347 0 0 if $self->jobStatus($jobid) eq "Eqw"
353 0 0 unless $self->settings("keep")
356 0 0 if wantarray
383 0 0 if ref $cmd eq ""
411 0 0 if ($status eq 'qw') { }
0 0 elsif ($status eq 'Eqw') { }
0 0 elsif ($status =~ /[rt]/) { }
422 0 0 unless -e $job->{'submitted'}
424 0 0 if -e $job->{'finished'}
425 0 0 unless keys %$job
427 0 0 if (-e $job->{'died'})
434 0 0 if -e $job->{'running'}
458 0 0 if ($F[0] eq $jobid)
484 0 0 unless open QSTAT, "qstat|"
511 0 1 if ($self->get('scheduler')) { }
0 1 elsif ($has_threads) { }
537 0 0 unless $j->{'thread'}
538 0 0 if $j->{'thread'} and not $j->{'thread'}->is_joinable
547 0 0 if $j->{'thread'}
552 0 0 if (@$job)
583 3 0 unless $qsub
586 0 0 if defined $mustfinish
587 0 0 if ($settings{'verbose'})
588 0 0 if @$job >= $settings{'numnodes'}
589 0 0 if $numSlots >= $settings{'maxslots'}
595 0 0 if ($state == 1) { }
0 0 elsif ($state == -1) { }
596 0 0 if $settings{'verbose'}
602 0 0 unless $settings{'warn_on_error'}
613 0 0 if not $settings{'mustfinish'} and @$job < $settings{'numnodes'} and $numSlots < $settings{'maxslots'}
649 0 0 unless -d "./.SGELK"
650 0 0 if $?
659 0 2 if ($use_threads) { }
664 0 2 if $?
693 0 0 unless defined $tmpSettings