| line |
true |
false |
branch |
|
238
|
0 |
0 |
unless (defined $args{'testfile'} or -x $lmutil) |
|
254
|
1 |
0 |
if (@args == 1) |
|
263
|
0 |
1 |
if (defined $self->{'lm_license_path'}) |
|
267
|
1 |
0 |
if (defined $args{'all'}) { } |
|
|
0 |
0 |
elsif (defined $args{'feature'}) { } |
|
|
0 |
0 |
elsif (defined $args{'daemon'}) { } |
|
277
|
1 |
0 |
if (defined $self->{'testfile'}) { } |
|
278
|
0 |
1 |
unless open $fh, $self->{'testfile'} |
|
280
|
0 |
0 |
if $self->{'verbose'} |
|
285
|
0 |
98 |
if $self->{'verbose'} |
|
288
|
1 |
97 |
if (my($server, $server_status) = /^\s*([\w.-]+): license server (\S+)/) { } |
|
|
3 |
94 |
elsif (my($vendor, $state) = /^\s*(\S+?): (.*)/) { } |
|
|
11 |
83 |
elsif (/^Users of (\S+):\s*\(Total of (\d+) licenses? issued;\s*Total of (\d+) lic/) { } |
|
|
36 |
47 |
elsif (my($clientinfo, $version, $serverhost, $port, $handle, $rest) = m[^\s+(.+) \(v([\d\.]+)\) \(([^/]+)/(\d+) (\d+)\), start (.*)]) { } |
|
|
4 |
43 |
elsif (my($reservations, $type, $group) = /^\s+(\d+)\s+RESERVATIONs? for ([\w_]+) ([\w_-]+) /) { } |
|
290
|
1 |
0 |
if ($server_status eq 'UP') { } |
|
299
|
3 |
0 |
if ($state =~ /^UP v([\d.]+)/) { } |
|
324
|
4 |
32 |
if (@parts == 2) { } |
|
|
28 |
4 |
elsif (@parts == 3) { } |
|
332
|
1 |
3 |
if ($parts[$max - 2] eq $parts[$max - 1]) { } |
|
340
|
3 |
0 |
if ($parts[$i] =~ m[^[:/]]) |
|
350
|
0 |
3 |
unless (defined $user) |
|
359
|
1 |
35 |
if ($rest =~ /^([^,]+), (\d+) license/) { } |
|
395
|
0 |
0 |
unless $args{$arg} |
|
399
|
0 |
0 |
if (defined $self->{'lm_license_path'}) |
|
404
|
0 |
0 |
if $self->{'verbose'} |