| blib/lib/Dancer/FileUtils.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 10 | 24 | 41.6 |
| line | true | false | branch |
|---|---|---|---|
| 42 | 0 | 1 | -e $path ? : |
| 60 | 0 | 140 | unless open my $fh, $mode, $filename |
| 67 | 0 | 60 | unless my $file = shift() |
| 71 | 1 | 59 | wantarray ? : |
| 84 | 1 | 63 | wantarray ? : |
| 91 | 0 | 2530 | unless my $path = shift() |
| 109 | 0 | 0 | if ($^O eq "cygwin") |
| 111 | 0 | 0 | unless @args |
| 117 | 0 | 0 | if $part |
| 124 | 0 | 0 | if ($slashes == 2) { } |
| 142 | 0 | 3 | unless close $fh |
| 143 | 0 | 3 | unless rename $filename, $file |