Branch Coverage

blib/lib/SlideMap.pm
Criterion Covered Total %
branch 56 122 45.9


line true false branch
102 0 1 if ($args{'machine'} eq 'MD3') { }
0 1 elsif ($args{'machine'} eq 'Lucidia') { }
0 1 elsif ($args{'machine'} eq 'Stanford') { }
0 1 elsif ($args{'machine'} eq 'MD') { }
1 0 elsif ($args{'machine'} eq 'IAS') { }
111 0 0 if ($self->{'_yspacing'} > 12)
130 0 0 if ($self->{'_xspacing'} > 16)
150 0 17 if ($self->{'_xspacing'} < 1 or $self->{'_xspacing'} eq "")
152 0 17 if ($self->{'_yspacing'} < 1 or $self->{'_yspacing'} eq "")
154 0 17 if ($self->{'_x_repeat'} < 1 or $self->{'_x_repeat'} > 4)
156 0 17 if ($self->{'_y_repeat'} < 1 or $self->{'_y_repeat'} > 4)
159 13 4 if ($self->{'_format'} == 2) { }
170 0 17 if ($self->{'_x_pin'} > $self->{'_max_plate_row'})
172 0 17 if ($self->{'_y_pin'} > $self->{'_max_plate_col'})
187 16 1 unless ($flag)
194 0 17 unless $self->{'_convert_well'} = eval "sub { $code1 }"
196 0 17 unless $self->{'_convert_spot'} = eval "sub { $code2 }"
223 0 0 if ($self->{'_machine'} eq "Lucidia")
255 0 0 if (length $plate_num == 1) { }
0 0 elsif (length $plate_num == 2) { }
260 0 0 if ($w == 1) { }
261 0 0 if (length $well == 1) { }
0 0 elsif (length $well == 2) { }
271 0 0 if (length $plate_col == 1)
295 0 0 if (length $plate_num == 1) { }
0 0 elsif (length $plate_num == 2) { }
302 0 0 if ($w == 1) { }
303 0 0 if (length $well == 1) { }
0 0 elsif (length $well == 2) { }
312 0 0 if (length $col == 1) { }
356 1 0 if ($informat == 1 or $informat == 2) { }
367 1 0 if ($dir == 0 or $dir == 1) { }
377 1 0 if ($nocomp == 0 or $nocomp == 1) { }
387 0 0 if ($mode == 1) { }
0 0 elsif ($mode == 0) { }
389 0 0 if ($self->{'_machine'} eq "MD" or $self->{'_machine'} eq "MD3")
393 0 0 if ($self->{'_machine'} eq 'MD3') { }
403 0 0 if ($self->{'_machine'} eq "MD" or $self->{'_machine'} eq "MD3")
406 0 0 if ($self->{'_machine'} eq 'MD3') { }
420 2 0 if ($xrep > 0 and $xrep < 5) { }
426 2 0 if ($yrep > 0 and $yrep < 5) { }
438 0 1 if ($order_string eq '') { }
449 2 0 if ($x > 0 and $y > 0) { }
461 4 0 if ($xs > 0 and $ys > 0) { }
475 1 3 if ($machine eq 'MD3') { }
1 2 elsif ($machine eq 'Lucidia') { }
1 1 elsif ($machine eq 'Stanford') { }
0 1 elsif ($machine eq 'MD') { }
1 0 elsif ($machine eq 'IAS') { }
570 4 13 if ($self->{'_machine'} eq "Stanford")
582 6 11 if ($self->{'_print_dir'} == 1) { }
603 4 13 if ($self->{'_machine'} eq 'Stanford') { }
617 0 17 if ($self->{'_machine'} eq 'Lucidia' and $self->{'_nocomplement'} == 1) { }
3 14 elsif ($self->{'_machine'} eq 'Lucidia') { }
3 11 elsif ($self->{'_nocomplement'} == 1) { }
670 3 14 if ($self->{'_machine'} eq 'Lucidia') { }
3 11 elsif ($self->{'_nocomplement'} == 1) { }
689 3 14 if ($self->{'_machine'} eq 'Lucidia') { }
705 4 13 if ($self->{'_machine'} eq 'Stanford') { }
719 6 11 if ($self->{'_print_dir'} == 1) { }
730 4 13 if ($self->{'_machine'} eq "Stanford")