Branch Coverage

blib/lib/UI/Dialog/Backend/Whiptail.pm
Criterion Covered Total %
branch 45 122 36.8


line true false branch
39 3 0 @_ ? :
0 3 ref $_[0] eq 'HASH' ? :
47 0 3 if ($CFG_PATH) { }
3 0 elsif ($ENV{'PATH'}) { }
48 0 0 if (ref $CFG_PATH eq 'ARRAY') { }
0 0 elsif ($CFG_PATH =~ /:/) { }
0 0 elsif (-d $CFG_PATH) { }
83 0 3 unless (-x $self->{'_opts'}{'bin'})
89 2 1 if exists $cfg->{'test_mode'}
102 0 0 unless (not ref $CODE)
123 5 0 if ($self->is_unit_test_mode)
134 4 0 if ($self->is_unit_test_mode)
136 4 0 wantarray ? :
144 0 0 if (-f $tmpfile and open WHIPF, '<' . $tmpfile) { }
154 0 0 unless defined wantarray
155 0 0 wantarray ? :
160 2 0 if ($self->is_unit_test_mode)
162 2 0 wantarray ? :
170 0 0 if (-f $tmpfile and open WHIPF, '<' . $tmpfile) { }
180 0 0 unless defined wantarray
181 0 0 wantarray ? :
193 0 1 $caller =~ /^UI\:\:Dialog\:\:Backend\:\:/ ? :
194 0 1 if ($_[0] and $_[0] eq 'caller')
211 0 1 if ($rv and $rv >= 1) { }
232 1 1 $caller =~ /^UI\:\:Dialog\:\:Backend\:\:/ ? :
233 1 1 if ($_[0] and $_[0] eq 'caller')
240 1 1 if ($args->{'password'}) { }
255 0 2 if ($rv and $rv >= 1) { }
280 1 3 $caller =~ /^UI\:\:Dialog\:\:Backend\:\:/ ? :
281 1 3 if ($_[0] and $_[0] eq 'caller')
290 1 3 if ($args->{'infobox'}) { }
306 0 4 if ($rv and $rv >= 1) { }
311 0 0 if ($args->{'msgbox'} eq 'infobox' and $args->{'timeout'} || $args->{'wait'})
315 0 0 $args->{'timeout'} ? :
0 0 $args->{'wait'} ? :
334 0 1 $caller =~ /^UI\:\:Dialog\:\:Backend\:\:/ ? :
335 0 1 if ($_[0] and $_[0] eq 'caller')
354 0 1 if ($rv and $rv >= 1) { }
371 0 1 $caller =~ /^UI\:\:Dialog\:\:Backend\:\:/ ? :
372 0 1 if ($_[0] and $_[0] eq 'caller')
378 0 1 if exists $args->{'menuheight'}
392 0 1 if ($rv and $rv >= 1) { }
408 1 1 $caller =~ /^UI\:\:Dialog\:\:Backend\:\:/ ? :
409 1 1 if ($_[0] and $_[0] eq 'caller')
415 0 2 if exists $args->{'menuheight'}
420 1 1 if (defined $args->{'radiolist'} and $args->{'radiolist'}) { }
433 0 2 if ($rv and $rv >= 1) { }
446 0 2 unless ref $this_rv eq 'ARRAY'
459 0 0 $caller =~ /^UI\:\:Dialog\:\:Backend\:\:/ ? :
460 0 0 if ($_[0] and $_[0] eq 'caller')
468 0 0 if (defined $self->{'_GAUGE'}{'FH'})
492 0 0 if ($rv and $rv >= 1) { }
504 0 0 unless defined $self->{'_GAUGE'}{'FH'}
510 0 0 defined $self->{'_GAUGE'}{'FH'} ? :
516 0 0 unless defined $self->{'_GAUGE'}{'FH'}
522 0 0 defined $self->{'_GAUGE'}{'FH'} ? :
529 0 0 unless $self->{'_GAUGE'}{'FH'}
534 0 0 defined $self->{'_GAUGE'}{'FH'} ? :
541 0 0 unless $self->{'_GAUGE'}{'FH'}
545 0 0 defined $self->{'_GAUGE'}{'FH'} ? :
550 0 0 unless $self->{'_GAUGE'}{'FH'}