| line |
true |
false |
branch |
|
218
|
0 |
0 |
if not $Term::ReadLine::registered and $Term::ReadLine::toloop |
|
222
|
0 |
0 |
if ${^UNICODE} & 1 || defined ${^ENCODING} and utf8::valid($str) |
|
227
|
0 |
0 |
if defined $str |
|
236
|
0 |
0 |
if (-e '/dev/tty' and $^O ne 'MSWin32') { } |
|
|
0 |
0 |
elsif (-e 'con' or $^O eq 'MSWin32' or $^O eq 'msys') { } |
|
|
0 |
0 |
elsif ($^O eq 'VMS') { } |
|
|
0 |
0 |
elsif ($^O eq 'os2' and not $DB::emacs) { } |
|
249
|
0 |
0 |
unless defined $consoleOUT |
|
250
|
0 |
0 |
unless defined $console |
|
251
|
0 |
0 |
if ($console eq '/dev/tty' and not open(my $fh, '<', $console)) |
|
255
|
0 |
0 |
unless (defined $consoleOUT) |
|
256
|
0 |
0 |
defined fileno STDERR && $^O ne 'MSWin32' ? : |
|
262
|
0 |
0 |
unless @_ == 2 or @_ == 4 |
|
266
|
0 |
0 |
if (@_ == 2) { } |
|
272
|
0 |
0 |
$^O eq 'MSWin32' && $console eq 'CONIN$' ? : |
|
289
|
0 |
0 |
if ($ret->Features->{'ornaments'} and not $ENV{'PERL_RL'} && $ENV{'PERL_RL'} =~ /\bo\w*=0/) |
|
370
|
0 |
0 |
if defined $terminal |
|
378
|
0 |
0 |
unless @_ |
|
381
|
0 |
0 |
if $rl_term_set eq '1' |
|
384
|
0 |
0 |
unless (defined $terminal) |
|
385
|
0 |
0 |
unless $Term::ReadLine::termcap_nowarn |
|
389
|
0 |
0 |
$_ ? : |
|
406
|
0 |
0 |
if (ref $Term::ReadLine::toloop) { } |
|
419
|
0 |
0 |
unless ($Term::ReadLine::registered++) |
|
421
|
0 |
0 |
if (ref $Term::ReadLine::toloop) { } |
|
423
|
0 |
0 |
if $$Term::ReadLine::toloop[1] |
|
433
|
0 |
0 |
if @_ > 1 |
|
443
|
0 |
0 |
unless (defined &Tk::DoOneEvent) |
|
452
|
0 |
0 |
if @_ > 0 |
|
462
|
0 |
0 |
if ($Term::ReadLine::toloop) |
|
463
|
0 |
0 |
unless $Term::ReadLine::registered |
|
470
|
0 |
0 |
if ${^UNICODE} & 1 || defined ${^ENCODING} and utf8::valid($str) |
|
475
|
0 |
0 |
if defined $str |