| blib/lib/IO/All/Link.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 7 | 18 | 38.8 |
| line | true | false | branch |
|---|---|---|---|
| 11 | 9 | 0 | if @_ |
| 23 | 0 | 0 | if $self->_assert |
| 32 | 0 | 2 | unless ($target) |
| 41 | 1 | 1 | if *$self->{'target'} |
| 46 | 0 | 1 | unless my $type = $new->type |
| 47 | 0 | 1 | if $type eq 'file' |
| 48 | 1 | 0 | if $type eq 'dir' |
| 49 | 0 | 0 | unless $type eq 'link' |
| 50 | 0 | 0 | if $seen{$new->name}++ |