| blib/lib/Image/Select.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 7 | 30 | 23.3 |
| line | true | false | branch |
|---|---|---|---|
| 42 | 3 | 1 | if (defined $self->{'type'}) |
| 47 | 1 | 2 | unless (defined $self->{'path_to_images'} and -d $self->{'path_to_images'}) |
| 68 | 0 | 2 | unless (@{$self->{'_images_to_select'};}) |
| 83 | 0 | 0 | if ($self->{'_images_index'} > $#{$$self{'_images_to_select'};}) |
| 84 | 0 | 0 | if ($self->{'loop'}) { } |
| 91 | 0 | 0 | unless (-r $file) |
| 95 | 0 | 0 | unless ($ret) |
| 103 | 0 | 0 | if (not defined $self->{'type'}) { } |
| 110 | 0 | 0 | if ($suffix eq 'jpg') |
| 125 | 0 | 0 | unless ($new_i) |
| 131 | 0 | 0 | if ($self->{'debug'}) |
| 138 | 0 | 0 | unless ($ret) |
| 149 | 0 | 0 | if ($width and $height) |
| 159 | 0 | 0 | if ($type) |
| 171 | 1 | 2 | if (&none(sub { $type eq $_; } , 'bmp', 'gif', 'jpeg', 'png', 'pnm', 'raw', 'sgi', 'tga', 'tiff')) |