| line |
true |
false |
branch |
|
55
|
8 |
5 |
if defined $$var{$q} |
|
57
|
1 |
4 |
if $$attr{'undef_verbosity'} eq 'warn' |
|
60
|
2 |
3 |
if $$attr{'undef_verbosity'} eq 'fatal' |
|
63
|
2 |
1 |
if $$attr{'undef_value'} eq 'ignore' |
|
71
|
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 || {}) |
|
86
|
13 |
12 |
if ('B' eq $ref) { } |
|
|
6 |
6 |
elsif ('V' eq $ref) { } |
|
|
0 |
6 |
elsif ($ref) { } |
|
95
|
0 |
13 |
if not defined $modf and $rest ne '' |
|
99
|
1 |
12 |
if (defined $ind) |
|
101
|
1 |
0 |
if (defined $$var{$q}) { } |
|
112
|
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) { } |
|
127
|
0 |
1 |
defined $$var{$q} ? : |
|
134
|
0 |
0 |
unless defined $$var{$q} |
|
142
|
2 |
0 |
if defined $$var{$q} |
|
156
|
0 |
3 |
unless $xtra =~ /^\s*$/ and $op =~ /^(s|tr|y)$/ |
|
162
|
0 |
3 |
if $@ |