| line |
true |
false |
branch |
|
37
|
105 |
25 |
defined $args{-'profile'} ? :
|
|
157
|
1 |
129 |
unless ($loader)
|
|
183
|
25 |
90 |
unless defined $file
|
|
184
|
3 |
87 |
if $file eq $Perl::ToPerl6::UserProfile::EMPTY
|
|
185
|
84 |
3 |
if $file eq 'NONE'
|
|
190
|
1 |
2 |
unless (defined $profile)
|
|
209
|
0 |
1 |
unless (defined $profile)
|
|
224
|
2 |
3 |
unless (defined $profile)
|
|
248
|
1 |
0 |
if exists $ENV{'PERLMOGRIFY'}
|
|
251
|
0 |
0 |
if -f $rc_file
|
|
254
|
0 |
0 |
if (my $home_dir = _find_home_dir())
|
|
256
|
0 |
0 |
if -f $path
|
|
268
|
0 |
0 |
if (eval {
do {
require File::HomeDir
}
})
|
|
274
|
0 |
0 |
unless defined $ENV{$key}
|
|
275
|
0 |
0 |
if -d $ENV{$key}
|
|
290
|
3 |
3 |
if ($defaults)
|