line |
true |
false |
branch |
51
|
4 |
0 |
!($^O =~ /interix/i) ? : |
54
|
1 |
2 |
if (/^:posix$/) { } |
|
0 |
2 |
elsif (/^:stty$/) { } |
|
1 |
1 |
elsif (/^:readkey$/) { } |
|
0 |
1 |
elsif (/^:DEFAULT$/ or not /^:/) { } |
71
|
0 |
3 |
if ($@) |
89
|
0 |
2 |
if (ref $class) |
107
|
0 |
0 |
unless defined $prompt |
110
|
0 |
0 |
if (ref $_[0] or $_[0] =~ /^\*/) { } |
140
|
0 |
0 |
if (defined $$this{'helptext'} and not defined $$this{'help'}) |
154
|
0 |
0 |
if (exists $SIG{'WINCH'}) |
158
|
0 |
0 |
if ($$this{'_sig_winch'}) |
174
|
0 |
0 |
if (/^\x1b([^\[])/ or /^\x1b\[(?:[A-Z]|\d+~)(.)/) |
181
|
0 |
0 |
if ($_ =~ /$$this{'tab'}/) |
182
|
0 |
0 |
if ($tab_pressed++) |
187
|
0 |
0 |
if (@match == 0) { } |
192
|
0 |
0 |
if (@match) { } |
|
0 |
0 |
elsif ($$this{'delim'}) { } |
206
|
0 |
0 |
if ($add) |
221
|
0 |
0 |
if ($_ =~ /$$this{'list'}/) |
227
|
0 |
0 |
if (defined $$this{'help'}) |
228
|
0 |
0 |
if ($_ =~ /$$this{'help'}/) |
229
|
0 |
0 |
if (defined $$this{'helptext'}) |
238
|
0 |
0 |
if ($_ =~ /$$this{'kill'}/) |
239
|
0 |
0 |
if ($r) |
251
|
0 |
0 |
if ($_ =~ /$$this{'erase'}/) |
252
|
0 |
0 |
if ($r) |
262
|
0 |
0 |
if ($_ =~ /$$this{'wipe'}/) |
263
|
0 |
0 |
if ($r) |
265
|
0 |
0 |
if defined $$this{'sep'} |
266
|
0 |
0 |
if defined $$this{'delim'} |
267
|
0 |
0 |
if (length $sep and $return =~ s/((?:^|[$sep$sep]+)[^$sep$sep]*[$sep$sep]*)$//s) |
278
|
0 |
0 |
if ($_ =~ /$$this{'up'}/) |
279
|
0 |
0 |
if (not defined $choice_num) { } |
281
|
0 |
0 |
if (defined $choice_cycle[$#choice_cycle]) |
285
|
0 |
0 |
if ($choice_num <= 0) |
291
|
0 |
0 |
if (not defined $choice_num) { } |
303
|
0 |
0 |
if ($_ =~ /$$this{'down'}/) |
304
|
0 |
0 |
if (not defined $choice_num) { } |
306
|
0 |
0 |
if (defined $choice_cycle[0]) |
310
|
0 |
0 |
if (++$choice_num >= @choice_cycle) |
315
|
0 |
0 |
if (not defined $choice_num) { } |
327
|
0 |
0 |
if (ord $_ >= 32) |
335
|
0 |
0 |
unless ($_ =~ /^\x1b/) |
347
|
0 |
0 |
defined $key ? : |
348
|
0 |
0 |
unless (defined $match) |
364
|
0 |
0 |
if (not $$this{'validate'}) { } |
|
0 |
0 |
elsif (ref $$this{'validate'}) { } |
371
|
0 |
0 |
unless (defined $match) |
383
|
0 |
0 |
if ($val eq 'lowercase') |
387
|
0 |
0 |
if ($val eq 'uppercase') |
391
|
0 |
0 |
if ($val eq 'match_one') |
395
|
0 |
0 |
if (@matches == 1) { } |
|
0 |
0 |
elsif (@matches == 0) { } |
402
|
0 |
0 |
if (@matches == 1) |
414
|
0 |
0 |
if ($val eq 'nonempty') |
415
|
0 |
0 |
unless (length $return) |
422
|
0 |
0 |
if ($val eq 'nonblank') |
423
|
0 |
0 |
unless (length $return and $return =~ /\S/) |
430
|
0 |
0 |
if ($val eq 'fromchoices') |
431
|
0 |
0 |
if (length $return and not grep(($return eq $_), $this->get_choices(''))) |
438
|
0 |
0 |
if ($val eq 'numeric') |
439
|
0 |
0 |
unless ($return =~ /^-?(?:\.\d+|\d+\.?\d*)$/) |
446
|
0 |
0 |
if ($val eq 'integer') |
447
|
0 |
0 |
unless ($return =~ /^-?\d+$/) |
454
|
0 |
0 |
if ($val eq 'nonzero') |
455
|
0 |
0 |
if ($return == 0) |
462
|
0 |
0 |
if ($val eq 'positive') |
463
|
0 |
0 |
unless ($return > 0) |
480
|
0 |
0 |
if $bell |
503
|
0 |
0 |
unless (@choices) |
506
|
0 |
0 |
if (defined $$this{'columns'} and $$this{'columns'} == 0) |
517
|
0 |
0 |
if (exists $SIG{'WINCH'}) |
521
|
0 |
0 |
if ($$this{'_sig_winch'}) |
528
|
0 |
0 |
unless $COLUMNS and $ROWS |
532
|
0 |
0 |
$maxwidth >= $COLUMNS ? : |
547
|
0 |
0 |
if ($ROWS and ++$page_lines == $ROWS) |
552
|
0 |
0 |
if ($c =~ /$$this{'quit'}/) { } |
|
0 |
0 |
elsif ($$this{'_winch'}) { } |
|
0 |
0 |
elsif ($c =~ /$$this{'enter'}/) { } |