| blib/lib/Perl/Critic/Command.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 25 | 59 | 42.3 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 145 | 47 | 1 | 1 | $opts{'-noprofile'} and $opts{'-profile'} |
| 149 | 46 | 2 | 1 | $opts{'-verbose'} and not $opts{'-verbose'} =~ /(?: \d+ | %[mfFlcCedrpPs] )/msx |
| 154 | 43 | 5 | 1 | exists $opts{'-top'} and $opts{'-top'} < 0 |
| 159 | 38 | 9 | 2 | exists $opts{'-severity'} and $opts{'-severity'} < $Perl::Critic::Command::SEVERITY_LOWEST || $opts{'-severity'} > $Perl::Critic::Command::SEVERITY_HIGHEST |
| 186 | 0 | 0 | 0 | @args == 1 and $args[0] eq "-" |
| 284 | 0 | 0 | 0 | not ref $file and $$opts_ref{$number_of_violations ? "-files-with-violations" : "-files-without-violations"} |
| 307 | 0 | 0 | 0 | $verbosity eq $Perl::Critic::Command::DEFAULT_VERBOSITY && @files > 1 |
| 341 | 0 | 0 | 0 | not $opts_ref->{'-statistics-only'} and $statistics->total_violations || !$opts_ref->{'-quiet'} && $statistics->modules |
| 518 | 0 | 0 | 0 | _this_is_windows() and not eval "require Win32::Console::ANSI; 1" |
| line | l | !l | condition |
|---|---|---|---|
| 94 | 3 | 2 | $opts{'-severity'} ||= 1 |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 85 | 9 | 1 | 34 | $opts{'-severity'} ||= &first(sub { |
| 86 | 10 | 2 | 32 | $opts{'-severity'} ||= &first(sub { |
| 95 | 3 | 2 | 0 | $opts{'-top'} ||= $DEFAULT_VIOLATIONS_FOR_TOP |
| 159 | 1 | 1 | 9 | $opts{'-severity'} < $Perl::Critic::Command::SEVERITY_LOWEST || $opts{'-severity'} > $Perl::Critic::Command::SEVERITY_HIGHEST |
| 186 | 0 | 0 | 0 | not @args or @args == 1 and $args[0] eq "-" |
| 193 | 0 | 0 | 0 | $code_string //= $Perl::Critic::Command::EMPTY |
| 266 | 0 | 0 | 0 | $opts_ref->{'-statistics'} or $opts_ref->{'-statistics-only'} |
| 281 | 0 | 0 | 0 | $opts_ref->{'-files-with-violations'} or $opts_ref->{'-files-without-violations'} |
| 298 | 0 | 0 | 0 | @violations or $opts_ref->{'-quiet'} |
| 341 | 0 | 0 | 0 | $statistics->total_violations || !$opts_ref->{'-quiet'} && $statistics->modules |