line |
true |
false |
branch |
36
|
8 |
5 |
if defined $var->{$q} |
41
|
1 |
4 |
if $attr->{'undef_verbosity'} eq 'warn' |
44
|
2 |
3 |
if $attr->{'undef_verbosity'} eq 'fatal' |
46
|
2 |
1 |
if $attr->{'undef_value'} eq 'ignore' |
54
|
0 |
21 |
unless $attr = check({'undef_value', {'allow', ['ignore', 'remove'], 'default', 'ignore'}, 'undef_verbosity', {'allow', ['silent', 'warn', 'fatal'], 'default', 'silent'}, 'undef_message', {'default', "undefined variable: %s\n"}}, $attr || {}) |
69
|
13 |
12 |
if ('B' eq $ref) { } |
|
6 |
6 |
elsif ('V' eq $ref) { } |
|
0 |
6 |
elsif ($ref) { } |
78
|
0 |
13 |
if not defined $modf and $rest ne '' |
82
|
1 |
12 |
if (defined $ind) |
84
|
1 |
0 |
if (defined $var->{$q}) { } |
95
|
4 |
9 |
if (not defined $modf) { } |
|
2 |
7 |
elsif (':?' eq $modf) { } |
|
1 |
6 |
elsif (':-' eq $modf) { } |
|
0 |
6 |
elsif (':=' eq $modf) { } |
|
2 |
4 |
elsif (':+' eq $modf) { } |
|
1 |
3 |
elsif ('::' eq $modf) { } |
|
3 |
0 |
elsif (':~' eq $modf) { } |
110
|
0 |
1 |
defined $var->{$q} ? : |
118
|
0 |
0 |
unless defined $var->{$q} |
126
|
2 |
0 |
if defined $var->{$q} |
139
|
0 |
3 |
unless $xtra =~ /^\s*$/ and $op =~ /^(s|tr|y)$/ |
145
|
0 |
3 |
if $@ |