line |
true |
false |
branch |
65
|
3448 |
0 |
index('$@', $sigil) >= 0 ? :
|
66
|
2586 |
862 |
if ($sigil eq '$') { }
|
|
862 |
0 |
elsif ($sigil eq '@') { }
|
93
|
0 |
0 |
if scalar @_ < 3
|
94
|
0 |
0 |
@$args < 4 ? :
|
105
|
0 |
0 |
if ($arg =~ /^\s*$/)
|
114
|
0 |
0 |
if (defined $val)
|
128
|
0 |
0 |
unless $what
|
139
|
0 |
0 |
unless $what
|
160
|
0 |
0 |
exists $opts->{'what'} ? :
|
161
|
0 |
0 |
exists $opts->{'name'} ? :
|
162
|
0 |
0 |
exists $opts->{'value'} ? :
|
180
|
0 |
0 |
if $self->{'subcmd_setting_key'}
|
189
|
0 |
0 |
if (not defined $bool) { }
|
|
0 |
0 |
elsif ($bool) { }
|
246
|
0 |
0 |
$settings{$self->subcmd_setting_key} ? :
|