| lib/Archive/Lha/Header/Base.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 15 | 22 | 68.1 |
| line | true | false | branch |
|---|---|---|---|
| 40 | 190 | 1 | $self->{'os'} ? : |
| 41 | 189 | 2 | $os_id && $os_id ne '?' ? : |
| 47 | 0 | 280 | if ($self->{'pathname'}) { } |
| 266 | 14 | elsif ($self->{'directory'} and $self->{'filename'}) { } | |
| 14 | 0 | elsif ($self->{'filename'}) { } | |
| 0 | 0 | elsif ($self->{'directory'}) { } | |
| 64 | 0 | 280 | if ("File::Spec::Unix"->file_name_is_absolute($path)) |
| 74 | 2 | 278 | if (lc $from eq 'guess') { } |
| 278 | 0 | elsif (lc $from ne lc $to) { } | |
| 79 | 2 | 0 | ref $enc ? : |
| 87 | 2 | 278 | if $trailing_slash and not $path =~ m[/$] |