| lib/Devel/Trepan/IO/Input.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 7 | 15 | 46.6 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 35 | 0 | 0 | 17 | !$ENV{'PERL_RL'} || $ENV{'PERL_RL'} =~ /\bperl5\b/i and eval 'use Term::ReadLine::Perl5; 1' |
| 57 | 14 | 0 | 13 | $opts->{'readline'} and $Devel::Trepan::IO::Input::HAVE_TERM_READLINE |
| 85 | 0 | 0 | 0 | exists $ENV{'TERM'} and $ENV{'TERM'} ne 'dumb' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 35 | 16 | 1 | 0 | !$ENV{'PERL_RL'} || $ENV{'PERL_RL'} =~ /\bperl5\b/i |
| 54 | 2 | 25 | 0 | $inp ||= *STDIN |