| blib/lib/Test/Smoke/BuildCFG.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 26 | 39 | 66.6 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 86 | 0 | 0 | 1 | $logfile and -f $logfile |
| 254 | 0 | 22 | 1 | exists $opts{''} and keys %opts == 1 |
| 364 | 3 | 0 | 3 | UNIVERSAL::isa($section, "HASH") and $section->{'policy_target'} |
| 563 | 8 | 56 | 0 | @_ == 1 && ref $_[0][0] eq 'ARRAY' |
| 599 | 35 | 47 | 43 | $ok &&= exists $self->[2]{$_} |
| line | l | !l | condition |
|---|---|---|---|
| 585 | 236 | 8 | join(' ', (sort {$self->[2]{$a} <=> $self->[2]{$b};} keys %{$$self[2];})) || '' |
| 665 | 103 | 67 | join(' ', (sort {$self->[2]{$a} <=> $self->[2]{$b};} keys %{$$self[2];})) || '' |
| 683 | 1 | 0 | join(' ', map({tr/"'//d; s/^-//; qq[-"$_"];} (sort {$self->[2]{$a} <=> $self->[2]{$b};} keys %{$$self[2];}))) || '' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 91 | 2 | 0 | 2 | exists $seen{"$config"} or skip_config($config) |
| 254 | 2 | 1 | 22 | keys %opts == 0 or exists $opts{''} and keys %opts == 1 |
| 434 | 3 | 0 | 14 | s/^Configuration:\s*// or /^Finished smoking/ |
| 525 | 0 | 244 | 0 | ref $proto || $proto |
| 614 | 1 | 1 | 0 | $ok ||= exists $self->[2]{$_} |
| 647 | 0 | 0 | 17 | @left || keys %copy |