Branch Coverage

blib/lib/WebEditor/OldFeatures/AdminExport.pm
Criterion Covered Total %
branch 0 26 0.0


line true false branch
19 0 0 unless opendir DIR, $c->paths->database
22 0 0 if $file =~ /^\.|CVS/i
23 0 0 unless -d $c->paths->database . '/' . $file
27 0 0 unless opendir DIR, $c->paths->database . '/content'
30 0 0 if $file =~ /^\.|CVS/i
31 0 0 unless -d $c->paths->database . '/content/' . $file
36 0 0 unless chdir $c->paths->database
39 0 0 if (not $tar->write($tarfile, 9) && $ok) { }
53 0 0 if (not param('tarfile')) { }
66 0 0 unless open BACKUP, ">$tarfile"
75 0 0 if ($tar->get_content('.theanswer') =~ /42/) { }
77 0 0 unless chdir $c->paths->database
79 0 0 if (not $tar->extract_archive($tarfile)) { }