Lines Matching refs:Perl
86 # https://github.com/Perl/version.pm claims CPAN is upstream
335 # In this file, we use the latter "Baby Perl" approach, and increment
342 my $Perl; # Safer version of $^X set by which_perl()
800 $runperl = qq{$Perl -e "print qq(} .
807 my $stdin = qq{$Perl -e 'print qq(} . $args{stdin} . qq{)' > teststdin; };
817 $runperl = qq{$Perl -e 'print qq(} .
887 unless (defined $Perl) {
888 $Perl = $^X;
891 return $Perl if $^O eq 'VMS';
906 if ($Perl =~ /^perl\Q$exe\E$/i) {
910 $Perl = "./$perl";
912 $Perl = File::Spec->catfile(File::Spec->curdir(), $perl);
919 if ($Perl !~ /\Q$exe\E$/i) {
920 $Perl .= $exe;
923 warn "which_perl: cannot find $Perl from $^X" unless -f $Perl;
926 $ENV{PERLEXE} = $Perl;
928 return $Perl;