| line |
true |
false |
branch |
|
114
|
0 |
0 |
if ($key eq '-file') { } |
|
|
0 |
0 |
elsif ($key eq '-language') { } |
|
|
0 |
0 |
elsif ($key eq '-predef') { } |
|
119
|
0 |
0 |
if ($type eq 'DateTime') { } |
|
|
0 |
0 |
elsif ($type eq 'UserValue') { } |
|
141
|
0 |
0 |
unless (defined ${$$self{'option'};}[0] and ${$$self{'option'};}[0] eq '-file') |
|
145
|
0 |
0 |
unless (-T ${$$self{'option'};}[1]) |
|
191
|
0 |
0 |
if ($key eq '-loadsection') { } |
|
|
0 |
0 |
elsif ($key eq '-protocol') { } |
|
|
0 |
0 |
elsif ($key eq '-exportto') { } |
|
|
0 |
0 |
elsif ($key eq '-loadvariable') { } |
|
229
|
0 |
0 |
if (defined $$self{'entrys'}{$1}) { } |
|
|
0 |
0 |
elsif (defined $$self{'predef'}{$1}) { } |
|
240
|
0 |
0 |
if ($subst =~ /(ENV::)(.+)/) { } |
|
242
|
0 |
0 |
if (defined $ENV{$2}) { } |
|
261
|
0 |
0 |
if (defined $filehandle) |
|
274
|
0 |
0 |
if (index($sections, "$1_*") > 0 or index($sections, "$1_$2") > 0 or $sections eq ';') |
|
278
|
0 |
0 |
unless (defined eval "package $exportto; " . "use vars qw( $variable ); " . "$variable = '$$self{'entrys'}{$key}';") |
|
290
|
0 |
0 |
if (defined $filehandle) |
|
298
|
0 |
0 |
if (defined $filehandle) |