| blib/lib/Archive/SelfExtract.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 5 | 20 | 25.0 |
| line | true | false | branch |
|---|---|---|---|
| 55 | 0 | 0 | if ($DebugLevel >= $level) |
| 64 | 0 | 1 | if (exists $options{'perlbin'}) |
| 68 | 1 | 0 | if (exists $options{'output_fh'}) { } |
| 73 | 0 | 1 | if (%options) |
| 77 | 0 | 1 | unless open my $script, "$scriptfn" |
| 79 | 0 | 1 | unless open my $zipdata, "$zipfn" |
| 108 | 0 | 0 | if (defined $Tempdir) { } |
| 110 | 0 | 0 | unless mkpath($Tempdir, $DebugLevel >= 4, 493) |
| 127 | 0 | 0 | if (0 == $arc->readFromFileHandle($rwhandle)) { } |
| 140 | 0 | 0 | if (-d $Tempdir) |