line |
true |
false |
branch |
181
|
2 |
0 |
defined $_[0] ? : |
184
|
0 |
2 |
unless ref $opt eq 'HASH' |
187
|
2 |
0 |
if exists $$opt{'basename'} |
190
|
2 |
0 |
if exists $$opt{'dirname'} |
193
|
0 |
2 |
if exists $$opt{'super_dir'} |
203
|
4 |
0 |
unless (exists $ALLOW_ISA{$name} or exists $ALLOW_REF{$name} or exists $ALLOW_RX{$name} or exists $ALLOW_VALUE{$name}) |
211
|
1 |
0 |
if (ref $val and exists $ALLOW_ISA{$name}) |
213
|
1 |
0 |
if &UNIVERSAL::isa($val, $class) |
218
|
0 |
0 |
if (ref $val and exists $ALLOW_REF{$name}) |
219
|
0 |
0 |
if exists $ALLOW_REF{$name}{ref $val} |
223
|
0 |
0 |
if (defined $val and not ref $val and exists $ALLOW_RX{$name}) |
225
|
0 |
0 |
if $val =~ /$rx/ |
230
|
0 |
0 |
if (not ref $val and exists $ALLOW_VALUE{$name}) |
231
|
0 |
0 |
if exists $ALLOW_VALUE{$name}{$val} |
246
|
0 |
0 |
unless $to_file |
264
|
0 |
0 |
unless scalar @from_dir and scalar @to_dir |
266
|
0 |
0 |
if $from_dir[0] != $to_dir[0] |
295
|
0 |
0 |
if $style->is_verbose |
300
|
0 |
0 |
unless defined $fh |
374
|
0 |
0 |
unless ($size->get_max_height and $size->get_max_width) |
408
|
0 |
0 |
unless $i > 0 |
414
|
0 |
0 |
if ($i == 1) |
419
|
0 |
0 |
if ($i == $size_nr - 1) { } |
426
|
0 |
0 |
if ($skip_size == $size) { } |
485
|
0 |
0 |
unless $next_file |
494
|
0 |
0 |
if ($href) { } |
518
|
0 |
0 |
unless $prev_file |
527
|
0 |
0 |
if ($href) { } |
557
|
0 |
0 |
unless $self->get_super_dir |
564
|
0 |
0 |
if ($self->isa('VLGal::Directory')) { } |
565
|
0 |
0 |
if $$seq_hier[0][$j]->isa('VLGal::Directory') |
569
|
0 |
0 |
unless $$seq_hier[0][$j]->isa('VLGal::Directory') |
578
|
0 |
0 |
unless $self->get_super_dir |
585
|
0 |
0 |
if ($self->isa('VLGal::Directory')) { } |
586
|
0 |
0 |
if $$seq_hier[0][$j]->isa('VLGal::Directory') |
590
|
0 |
0 |
unless $$seq_hier[0][$j]->isa('VLGal::Directory') |
600
|
0 |
0 |
if $self->isa('VLGal::Directory') |
631
|
0 |
2 |
unless &_value_is_allowed('basename', $val) |
642
|
0 |
2 |
unless &_value_is_allowed('dirname', $val) |
653
|
0 |
1 |
unless &_value_is_allowed('super_dir', $val) |