| blib/lib/Data/Mirror.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 16 | 30 | 53.3 |
| line | true | false | branch |
|---|---|---|---|
| 66 | 6 | 0 | unless defined $ttl |
| 70 | 2 | 4 | unless stale($url) |
| 77 | 4 | 0 | if (&any(sub { $_ == $result->code; } , 304, 200)) |
| 84 | 4 | 0 | if -e $file |
| 87 | 0 | 4 | if $result->code >= 400 |
| 89 | 4 | 0 | if (-e $file) |
| 102 | 2 | 0 | if ($file) |
| 114 | 2 | 0 | if ($file) |
| 130 | 0 | 0 | if $file |
| 140 | 1 | 0 | if $str |
| 150 | 1 | 0 | if $file |
| 160 | 1 | 0 | if ($fh) |
| 183 | 0 | 16 | $url->isa('URI') ? : |
| 206 | 4 | 3 | unless -e $file |
| 208 | 0 | 3 | unless &Data::Mirror::stat($file)->mtime > time - ($ttl || $Data::Mirror::TTL_SECONDS) |