| line |
true |
false |
branch |
|
23
|
1 |
0 |
if (exists $Test::Perl::Critic::Git::CHECK_ARGS{'explicit'})
|
|
32
|
0 |
4 |
if $s_file eq 'File::Spec'->catfile($s_current_dir, $_) or $s_file eq $_
|
|
40
|
1 |
2 |
if scalar keys %{$hr_files;} == 0
|
|
49
|
1 |
1 |
if (scalar @a_violations > 0)
|
|
58
|
2 |
0 |
!($b_switch || $i_files_to_test) || $b_switch && $i_files_to_test ? :
|
|
73
|
0 |
2 |
if exists $hr_critic_args->{'-format'}
|
|
75
|
1 |
1 |
$hr_git_args ? :
|
|
76
|
1 |
1 |
$hr_check_args ? :
|
|
82
|
0 |
2 |
if not $ar_dirs or scalar @{$ar_dirs;} == 0
|
|
84
|
1 |
0 |
$hr_files->{$_} ? :
|
|
94
|
0 |
1 |
if not $ar_dirs or scalar @{$ar_dirs;} == 0
|
|
96
|
1 |
0 |
$hr_files->{$_} ? :
|