| line |
true |
false |
branch |
|
90
|
2 |
0 |
if (@_) |
|
93
|
0 |
2 |
unless $expiry |
|
94
|
2 |
0 |
if ($servicelevel) |
|
95
|
0 |
2 |
unless length $servicelevel == 1 |
|
99
|
2 |
0 |
if $servicelevel |
|
100
|
1 |
1 |
if $needbefore |
|
101
|
1 |
1 |
if $expirydate |
|
126
|
0 |
0 |
unless $expiry |
|
127
|
0 |
0 |
if ($servicelevel) |
|
128
|
0 |
0 |
unless length $servicelevel == 1 |
|
132
|
0 |
0 |
if $servicelevel |
|
133
|
0 |
0 |
if $needbefore |
|
134
|
0 |
0 |
if $expirydate |
|
156
|
0 |
0 |
if ($k =~ /^level-of-service$/) { } |
|
|
0 |
0 |
elsif ($k =~ /^need-before-date$/ or $k =~ /^expiry-date$/) { } |
|
|
0 |
0 |
elsif ($k =~ /^expiry-flag$/) { } |