| line |
true |
false |
branch |
|
17
|
0 |
0 |
if ($$opt{'default'} and $$opt{'valid'} and not $$opt{'no_valid_default'}) |
|
18
|
0 |
0 |
unless $$opt{'valid'}($$opt{'default'}) |
|
25
|
0 |
0 |
if (defined $_[1]) { } |
|
40
|
0 |
0 |
if ($$opt{'default'} and not length $response) |
|
51
|
0 |
0 |
if defined $$opt{'default'} and not $$opt{'default'} =~ /\A[yn01]\z/ |
|
55
|
0 |
0 |
$$opt{'default'} ? : |
|
|
0 |
0 |
$$opt{'default'} eq 'n' ? : |
|
|
0 |
0 |
$$opt{'default'} eq 'y' ? : |
|
|
0 |
0 |
!defined($$opt{'default'}) ? : |
|
61
|
0 |
0 |
$$opt{'default'} ? : |
|
|
0 |
0 |
($$opt{'default'} || '') =~ /\A\d\z/ ? : |
|
70
|
0 |
0 |
unless lc $_[0] eq 'y' |