| line |
true |
false |
branch |
|
23
|
2 |
6 |
if (@_) |
|
24
|
0 |
2 |
unless (ref $self) |
|
29
|
4 |
4 |
ref $self && exists $$self{$key} ? : |
|
34
|
0 |
1 |
unless ref $self |
|
44
|
2 |
0 |
$^V ? : |
|
56
|
0 |
3 |
unless -e $perl |
|
59
|
0 |
3 |
unless open $fh, '-|', $perl, @_ |
|
60
|
3 |
0 |
unless ($@) |
|
61
|
2 |
1 |
if wantarray |
|
68
|
0 |
0 |
if ($^O eq 'MSWin32') { } |
|
69
|
0 |
0 |
if $perl =~ /^[\w\\]+$/ |
|
85
|
4 |
0 |
if 'File::Spec'->file_name_is_absolute($^X) |
|
90
|
0 |
0 |
if ($self->os_type eq 'VMS') { } |
|
|
0 |
0 |
elsif (defined $exe) { } |
|
92
|
0 |
0 |
unless $thisperl =~ /$exe(;\d+)?$/i |
|
94
|
0 |
0 |
unless $thisperl =~ /$exe$/i |
|
101
|
0 |
0 |
if -f $perl and $self->perl_is_same($perl) |