| line |
true |
false |
branch |
|
42
|
1 |
0 |
@_ ? : |
|
|
0 |
1 |
ref $_[0] eq 'HASH' ? : |
|
51
|
0 |
1 |
if ($CFG_PATH) { } |
|
|
1 |
0 |
elsif ($ENV{'PATH'}) { } |
|
52
|
0 |
0 |
if (ref $CFG_PATH eq 'ARRAY') { } |
|
|
0 |
0 |
elsif ($CFG_PATH =~ /$path_sep/) { } |
|
|
0 |
0 |
elsif (-d $CFG_PATH) { } |
|
79
|
0 |
1 |
$cfg->{'colours'} || $cfg->{'colors'} ? : |
|
81
|
0 |
1 |
if $^O =~ /win32/i |
|
88
|
1 |
0 |
unless (-x $self->{'_opts'}{'bin'}) |
|
93
|
0 |
0 |
ref $beginref eq 'ARRAY' ? : |
|
119
|
0 |
0 |
if exists $cfg->{'test_mode'} |
|
131
|
0 |
0 |
if ($str =~ /version\s0\.[34]/m) { } |
|
|
0 |
0 |
elsif ($str =~ /cdialog\s\(ComeOn\sDialog\!\)\sversion\s(\d+\.\d+.+)/) { } |
|
143
|
0 |
0 |
if ($ver =~ /-20(?:0[3-9]|\d\d)/) { } |
|
161
|
0 |
0 |
unless (not ref $CODE) |
|
172
|
0 |
0 |
$args->{'DIALOGRC'} && -r $args->{'DIALOGRC'} ? : |
|
199
|
0 |
0 |
if ($self->{'_opts'}{'force-no-separate-output'}) { } |
|
204
|
0 |
0 |
if ($self->is_cdialog) |
|
207
|
0 |
0 |
if (exists $args->{'begin'}) |
|
209
|
0 |
0 |
if (ref $begin eq 'ARRAY') |
|
224
|
0 |
0 |
exists $_[3] && defined $_[3] ? : |
|
227
|
0 |
0 |
if (ref $text eq 'ARRAY') { } |
|
|
0 |
0 |
elsif ($text =~ /\\n/) { } |
|
244
|
0 |
0 |
if ($self->{'scale'}) |
|
250
|
0 |
0 |
if $self->{'width'} - 5 < length $s_line and length $s_line <= $self->{'max-scale'} |
|
254
|
0 |
0 |
$^O =~ /win32/i ? : |
|
258
|
0 |
0 |
if ($line =~ /\[A\=(\w+)\]/i) |
|
261
|
0 |
0 |
if (uc $align eq 'CENTER' or uc $align eq 'C') { } |
|
|
0 |
0 |
elsif (uc $align eq 'LEFT' or uc $align eq 'L') { } |
|
|
0 |
0 |
elsif (uc $align eq 'RIGHT' or uc $align eq 'R') { } |
|
271
|
0 |
0 |
if ($pad) { } |
|
320
|
0 |
0 |
if ($self->is_cdialog and $self->{'_opts'}{'colours'}) { } |
|
353
|
0 |
0 |
if $self->{'_variant'} and $self->{'_variant'} eq 'cdialog' |
|
362
|
0 |
0 |
$caller =~ /^UI\:\:Dialog\:\:Backend\:\:/ ? : |
|
363
|
0 |
0 |
if ($_[0] and $_[0] eq 'caller') |
|
377
|
0 |
0 |
if ($rv and $rv >= 1) { } |
|
388
|
0 |
0 |
$rv == 0 ? : |
|
396
|
0 |
0 |
$caller =~ /^UI\:\:Dialog\:\:Backend\:\:/ ? : |
|
397
|
0 |
0 |
if ($_[0] and $_[0] eq 'caller') |
|
404
|
0 |
0 |
if ($args->{'password'}) { } |
|
405
|
0 |
0 |
if ($args->{'entry'}) { } |
|
424
|
0 |
0 |
$rv == 0 ? : |
|
437
|
0 |
0 |
$caller =~ /^UI\:\:Dialog\:\:Backend\:\:/ ? : |
|
438
|
0 |
0 |
if ($_[0] and $_[0] eq 'caller') |
|
447
|
0 |
0 |
if ($args->{'infobox'}) { } |
|
460
|
0 |
0 |
if ($args->{'infobox'}) |
|
462
|
0 |
0 |
if ($args->{'timeout'}) { } |
|
|
0 |
0 |
elsif ($args->{'wait'}) { } |
|
463
|
0 |
0 |
$args->{'timeout'} ? : |
|
466
|
0 |
0 |
$args->{'wait'} ? : |
|
469
|
0 |
0 |
if $sec |
|
472
|
0 |
0 |
$rv == 0 ? : |
|
484
|
0 |
0 |
$caller =~ /^UI\:\:Dialog\:\:Backend\:\:/ ? : |
|
485
|
0 |
0 |
if ($_[0] and $_[0] eq 'caller') |
|
502
|
0 |
0 |
$rv == 0 ? : |
|
510
|
0 |
0 |
$caller =~ /^UI\:\:Dialog\:\:Backend\:\:/ ? : |
|
511
|
0 |
0 |
if ($_[0] and $_[0] eq 'caller') |
|
517
|
0 |
0 |
if exists $args->{'menuheight'} |
|
530
|
0 |
0 |
$rv == 0 ? : |
|
538
|
0 |
0 |
$caller =~ /^UI\:\:Dialog\:\:Backend\:\:/ ? : |
|
539
|
0 |
0 |
if ($_[0] and $_[0] eq 'caller') |
|
545
|
0 |
0 |
if exists $args->{'menuheight'} |
|
550
|
0 |
0 |
if ($args->{'radiolist'}) { } |
|
563
|
0 |
0 |
if ($args->{'radiolist'}) |
|
565
|
0 |
0 |
$rv == 0 ? : |
|
568
|
0 |
0 |
$rv == 0 ? : |
|
580
|
0 |
0 |
unless ($self->is_cdialog) |
|
584
|
0 |
0 |
$caller =~ /^UI\:\:Dialog\:\:Backend\:\:/ ? : |
|
585
|
0 |
0 |
if ($_[0] and $_[0] eq 'caller') |
|
602
|
0 |
0 |
$rv == 0 ? : |
|
611
|
0 |
0 |
$caller =~ /^UI\:\:Dialog\:\:Backend\:\:/ ? : |
|
612
|
0 |
0 |
if ($_[0] and $_[0] eq 'caller') |
|
629
|
0 |
0 |
if ($rv == 0) |
|
633
|
0 |
0 |
$rv == 0 ? : |
|
|
0 |
0 |
unless defined wantarray and wantarray |
|
634
|
0 |
0 |
$rv == 0 ? : |
|
643
|
0 |
0 |
$caller =~ /^UI\:\:Dialog\:\:Backend\:\:/ ? : |
|
644
|
0 |
0 |
if ($_[0] and $_[0] eq 'caller') |
|
662
|
0 |
0 |
if ($rv == 0) |
|
666
|
0 |
0 |
$rv == 0 ? : |
|
|
0 |
0 |
unless defined wantarray and wantarray |
|
667
|
0 |
0 |
$rv == 0 ? : |
|
676
|
0 |
0 |
$caller =~ /^UI\:\:Dialog\:\:Backend\:\:/ ? : |
|
677
|
0 |
0 |
if ($_[0] and $_[0] eq 'caller') |
|
693
|
0 |
0 |
$rv == 0 ? : |
|
702
|
0 |
0 |
$caller =~ /^UI\:\:Dialog\:\:Backend\:\:/ ? : |
|
703
|
0 |
0 |
if ($_[0] and $_[0] eq 'caller') |
|
719
|
0 |
0 |
$rv == 0 ? : |
|
727
|
0 |
0 |
$caller =~ /^UI\:\:Dialog\:\:Backend\:\:/ ? : |
|
728
|
0 |
0 |
if ($_[0] and $_[0] eq 'caller') |
|
734
|
0 |
0 |
if exists $args->{'menuheight'} |
|
736
|
0 |
0 |
if exists $args->{'formheight'} |
|
767
|
0 |
0 |
$rv == 0 ? : |
|
|
0 |
0 |
unless defined wantarray and wantarray |
|
768
|
0 |
0 |
$rv == 0 ? : |
|
776
|
0 |
0 |
$caller =~ /^UI\:\:Dialog\:\:Backend\:\:/ ? : |
|
777
|
0 |
0 |
if ($_[0] and $_[0] eq 'caller') |
|
785
|
0 |
0 |
if (defined $self->{'_GAUGE'}{'FH'}) |
|
815
|
0 |
0 |
unless defined $self->{'_GAUGE'}{'FH'} |
|
821
|
0 |
0 |
defined $self->{'_GAUGE'}{'FH'} ? : |
|
827
|
0 |
0 |
unless defined $self->{'_GAUGE'}{'FH'} |
|
833
|
0 |
0 |
defined $self->{'_GAUGE'}{'FH'} ? : |
|
839
|
0 |
0 |
unless $self->{'_GAUGE'}{'FH'} |
|
845
|
0 |
0 |
defined $self->{'_GAUGE'}{'FH'} ? : |
|
852
|
0 |
0 |
unless $self->{'_GAUGE'}{'FH'} |
|
857
|
0 |
0 |
defined $self->{'_GAUGE'}{'FH'} ? : |
|
862
|
0 |
0 |
unless $self->{'_GAUGE'}{'FH'} |