| blib/lib/Perl/Critic/UserProfile.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 18 | 30 | 60.0 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 270 | 0 | 0 | 0 | $^O eq 'MSWin32' && "$]" < 5.016 |
| line | l | !l | condition |
|---|---|---|---|
| 78 | 229 | 10535 | $profile->{$short_name} || $profile->{$long_name} || $$profile{"-$short_name"} || $$profile{"-$long_name"} || {} |
| 154 | 58 | 3027 | ref $profile || 'DEFAULT' |
| 171 | 4 | 3077 | delete $profile->{'__defaults__'} || {} |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 37 | 3054 | 0 | 31 | $args{'-profile'} // _find_profile_path() |
| 71 | 0 | 12374 | 0 | ref $policy || policy_long_name($policy) |
| 88 | 10874 | 12 | 0 | ref $policy || policy_long_name($policy) |
| 92 | 235 | 2 | 10649 | exists $$profile{"-$short_name"} || exists $$profile{"-$long_name"} |
| 101 | 10874 | 12 | 0 | ref $policy || policy_long_name($policy) |
| 105 | 165 | 0 | 10721 | exists $profile->{$short_name} || exists $profile->{$long_name} |
| 270 | 0 | 0 | 0 | $ENV{'HOME'} || $ENV{'USERPROFILE'} |