| line |
true |
false |
branch |
|
35
|
0 |
0 |
if (@_) |
|
40
|
0 |
0 |
if (exists $licenses{$key}) |
|
63
|
0 |
0 |
if (not defined $master) { } |
|
72
|
0 |
0 |
if exists $legit{$master->name} |
|
75
|
0 |
0 |
unless my $pipe = 'NBU'->cmd('bpminlicense -M ' . $master->name . ' -nb_features -verbose |') |
|
81
|
0 |
0 |
if (/^[\S]+/) |
|
82
|
0 |
0 |
if defined $l |
|
87
|
0 |
0 |
if (/^ file version[\s]+= ([\S]+)$/) |
|
92
|
0 |
0 |
if (/^ time added[\s]+= ([\S]+) (.*)$/) |
|
96
|
0 |
0 |
if (/^ hostname[\s]+= ([\S]+)$/) |
|
101
|
0 |
0 |
if (/^ product ID[\s]+= ([\S]+) (.*)$/) |
|
108
|
0 |
0 |
if (/^ serial number[\s]+= ([\S]+)$/) |
|
112
|
0 |
0 |
if (/^ key version[\s]+= ([\S]+)$/) |
|
116
|
0 |
0 |
if (/^ count[\s]+= ([\S]+)$/) |
|
120
|
0 |
0 |
if (/^ server platform[\s]+= ([\S]+) (.*)$/) |
|
124
|
0 |
0 |
if (/^ client platform[\s]+= ([\S]+) (.*)$/) |
|
128
|
0 |
0 |
if (/^ server tier[\s]+= ([\S]+) (.*)$/) |
|
132
|
0 |
0 |
if (/^ client tier[\s]+= ([\S]+) (.*)$/) |
|
136
|
0 |
0 |
if (/^ license type[\s]+= ([\S]+) (.*)$/) |
|
140
|
0 |
0 |
if (/^ Site ID[\s]+= ([\S]+) (.*)$/) |
|
144
|
0 |
0 |
if (/^ Feature ID[\s]+= ([\S]+) (.*)$/) |
|
152
|
0 |
0 |
if (/^ Expiration[\s]+= (Not e|E)xpired (.*)$/) |
|
156
|
0 |
0 |
if (/^ Time Left[\s]+=/) |
|
159
|
0 |
0 |
if (/^ Firm Expiration[\s]+=/) |
|
172
|
0 |
0 |
if $mmOnlyP |
|
174
|
0 |
0 |
if exists $legit{$ms->name} |
|
229
|
0 |
0 |
defined $$self{'EXPIRATION'} ? : |
|
274
|
0 |
0 |
if (defined(my $featureCode = $class2feature{$classType})) |
|
290
|
0 |
0 |
if defined $host and $l->host != $host |
|
293
|
0 |
0 |
if $f == $featureCode |