Condition Coverage

blib/lib/Term/Shell.pm
Criterion Covered Total %
condition 24 135 17.7


and 3 conditions

line !l l&&!r l&&r condition
85 0 0 0 @c and $o->{'API'}{'match_uniq'}
181 0 0 0 $pager and $pager ne "internal"
412 0 3 0 $TERM and $o->{'API'}{'readline'} eq "Term::ReadLine::Gnu"
418 3 0 0 $^O eq "MSWin32" and eval { do { require Win32::Console } }
433 0 0 0 @x == 2 and $x[0]
489 0 0 0 $^O eq "MSWin32" and eval { do { require Win32::Console } }
547 0 0 0 !defined($line) || $line =~ /^\s*$/u and defined $default
562 0 0 0 $term and $term->ReadLine eq "Term::ReadLine::Gnu"
0 0 0 $term and $term->ReadLine eq "Term::ReadLine::Perl"
607 2 1 0 $len < length $_ and $len = length $_
616 0 0 3 $vals[$i] =~ /\s/u && !($vals[$i] =~ /^\d/u)
661 0 0 0 $i <= length $raw and ($c = substr($raw, $i, 1)) ne $quote
704 0 0 0 $c =~ /\S/u and @args == 1
762 2 0 0 $add_cmd_name and not $preserve_args
997 0 0 0 @words == 2 and $start == length $line
1016 0 0 0 @c and $o->{'API'}{'match_uniq'}

or 2 conditions

line l !l condition
18 3 0 eval { do { local $SIG{'__WARN__'} = sub { } ; 'Term::ReadLine'->new('shell') } } || undef
42 0 3 $ENV{'PAGER'} || 'internal'
3 0 eval { do { $o->{'term'}->ReadLine } } || 'none'
585 2 0 shift() || ': '
586 2 0 shift() || 0
587 0 2 shift() || ''
588 0 2 shift() || 0
589 0 2 shift() || 0
695 0 0 shift() || $o->line || (return ())
774 0 0 shift() || []
809 3 0 shift() || []
810 3 0 shift() || 'run'

or 3 conditions

line l !l&&r !l&&!r condition
18 0 3 0 ref $cls || $cls
123 0 0 0 $o->{'API'}{'check_idle'} == 0 or not defined $o->{'term'}->IN
174 0 0 1 shift() || $o->termsize->{'rows'}
181 0 1 0 $lines < $maxlines or $maxlines == 0
1 0 0 $lines < $maxlines or $maxlines == 0 or $pager eq "none"
257 0 0 0 $ans =~ /q/iu or not $o->have_readkey
423 0 0 0 $o->{'win32_stdout'} ||= "Win32::Console"->new(STD_OUTPUT_HANDLE())
456 0 0 0 $ENV{'LINES'} or $ENV{'ROWS'}
0 0 0 $ENV{'LINES'} or $ENV{'ROWS'} or $ENV{'COLUMNS'}
458 0 0 0 $ENV{'LINES'} || $ENV{'ROWS'} || $rows
459 0 0 0 $ENV{'COLUMNS'} || $cols
502 0 0 0 $o->{'win32_stdin'} ||= "Win32::Console"->new(STD_INPUT_HANDLE())
547 0 0 0 !defined($line) || $line =~ /^\s*$/u
606 0 0 2 shift() || $o->termsize->{'cols'}
687 0 0 0 shift() || $o->line
706 0 0 0 $o->{'line_args'} ||= substr($args, $i)
912 0 0 0 $o->{'handlers'}{$alias}{$type} || "${type}_$alias"
919 2 3 0 shift() || $o->{'API'}{'class'}
948 0 0 0 $start == 0 or substr($line, 0, $start) =~ /^\s*$/u
997 0 0 0 @words > 2 or @words == 2 and $start == length $line
1088 0 2 0 ref $_[0] || $_[0]