line |
true |
false |
branch |
110
|
3 |
0 |
if ($self->_run_queue_active) |
114
|
0 |
0 |
if ($self->verbose) |
126
|
0 |
0 |
if ($self->verbose) |
143
|
3 |
0 |
if /\S/ |
179
|
0 |
0 |
if ($primary_target eq $current_target) |
194
|
0 |
0 |
unless my $file_text = $self->_run("git", "show", "${current_target}:$file") |
196
|
0 |
0 |
if ($self->max_file_size) |
200
|
0 |
0 |
unless length $file_text <= $self->max_file_size |
209
|
0 |
0 |
if $profile |
213
|
0 |
0 |
unless $critique |
224
|
0 |
0 |
/^ \@\@\s+ -\d+,\d+\s+
\+(?\d+)
,(?\d+)
\s+\@\@/sx ? : |
229
|
0 |
0 |
if $this_critique =~ / source OK$/ |
231
|
0 |
0 |
unless (defined $+{'line_number'}) |
237
|
0 |
0 |
if $+{'line_number'} > $max_line_number |
241
|
0 |
0 |
if ($+{'line_number'} >= $min and $+{'line_number'} <= $max) |
242
|
0 |
0 |
unless ($reported{$this_critique}) |
258
|
1 |
2 |
unless -e $file |
259
|
2 |
0 |
if $file =~ /\.(?:p[ml]|t)$/ |
265
|
0 |
0 |
if ($first_line =~ /^#!.*\bperl\b/) |
266
|
0 |
0 |
if $self->verbose |