Branch Coverage

lib/Workflow/Persister/File.pm
Criterion Covered Total %
branch 11 22 50.0


line true false branch
22 2 0 unless ($self->use_uuid eq "yes" or $self->use_random eq "yes")
26 0 2 unless ($params->{'path'})
30 0 2 unless (-d $params->{'path'})
49 0 2 unless mkdir $full_history_path, 511
59 0 4 unless (-f $full_path)
67 0 4 if ($Workflow::Persister::File::EVAL_ERROR)
85 0 3 if ($history->is_saved)
103 0 2 unless opendir my $hist, $history_dir
140 0 9 unless open THINGY, ">", $path
144 0 9 unless close THINGY
156 0 9 if $EVAL_ERROR