| line |
true |
false |
branch |
|
13
|
1 |
0 |
unless @ARGV |
|
20
|
0 |
1 |
if $Shell::POSIX::Select::DEBUG > 1 and Deparse error: Can't locate object method "object_2svref" via package "B::SPECIAL" at /usr/local/lib/perl5/5.26.1/B/Deparse.pm line 5018. |
|
28
|
0 |
1 |
if ($Shell::POSIX::Select::DEBUG > 4) |
|
47
|
0 |
1 |
-t STDIN ? : |
|
49
|
1 |
0 |
if (defined $Shell::POSIX::Select::menu) { } |
|
60
|
0 |
1 |
if ($Shell::POSIX::Select::do_prompt[1]) |
|
65
|
0 |
0 |
if ($Shell::POSIX::Select::_extra_nl) |
|
78
|
1 |
0 |
if ($Shell::POSIX::Select::dump_data) { } |
|
93
|
0 |
0 |
unless (defined $Reply) |
|
94
|
0 |
0 |
if defined "" and Deparse error: Can't locate object method "object_2svref" via package "B::SPECIAL" at /usr/local/lib/perl5/5.26.1/B/Deparse.pm line 5018. |
|
109
|
0 |
0 |
unless defined $Reply |
|
113
|
0 |
0 |
if defined "" and Deparse error: Can't locate object method "object_2svref" via package "B::SPECIAL" at /usr/local/lib/perl5/5.26.1/B/Deparse.pm line 5018. |
|
116
|
0 |
0 |
if ($Reply eq '') { } |
|
|
0 |
0 |
elsif ($Reply =~ /\D/) { } |
|
|
0 |
0 |
elsif ($Reply < 1 or $Reply > $Shell::POSIX::Select::num_values) { } |
|
118
|
0 |
0 |
if $Shell::POSIX::Select::U_WARN > 1 |
|
122
|
0 |
0 |
if $Shell::POSIX::Select::U_WARN > 0 |
|
127
|
0 |
0 |
if $Shell::POSIX::Select::U_WARN > 0 |
|
135
|
0 |
0 |
unless $Shell::POSIX::Select::bad |
|
137
|
0 |
0 |
unless $Shell::POSIX::Select::bad |
|
159
|
0 |
0 |
if $Shell::POSIX::Select::DEBUG > 0 |
|
161
|
0 |
0 |
if ($Shell::POSIX::Select::dump_data) |