This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
remove trailing whitespace
[metaconfig.git] / U / installdirs / perl5.U
index a83f0ba..d321c56 100644 (file)
@@ -1,7 +1,7 @@
 ?RCS: $Id: perl5.U,v $
 ?RCS:
 ?RCS: Copyright (c) 2000 Andrew Dougherty
-?RCS: 
+?RCS:
 ?RCS:     You may distribute under the terms of either the GNU General Public
 ?RCS:     License or the Artistic License, as specified in the README file.
 ?RCS:
@@ -13,7 +13,7 @@
 ?X:    We check for 5.005 and later because inc_version_list is
 ?X:    irrelevant for earlier versions.
 ?X:
-?MAKE:perl5: path_sep binexp test sed
+?MAKE:perl5: path_sep binexp test sed exe_ext
 ?MAKE: -pick add $@ %<
 ?Y:TOP
 ?S:perl5:
 : Find perl5.005 or later.
 echo "Looking for a previously installed perl5.005 or later... "
 case "$perl5" in
-'')    for tdir in `echo "$binexp:$PATH" | $sed "s/$path_sep/ /g"`; do
+'')    for tdir in `echo "$binexp$path_sep$PATH" | $sed "s/$path_sep/ /g"`; do
                : Check if this perl is recent and can load a simple module
-               if $test -x $tdir/perl && $tdir/perl -Mless -e 'use 5.005;' >/dev/null 2>&1; then
+               if $test -x $tdir/perl$exe_ext && $tdir/perl -Mless -e 'use 5.005;' >/dev/null 2>&1; then
                        perl5=$tdir/perl
                        break;
-               elif $test -x $tdir/perl5 && $tdir/perl5 -Mless -e 'use 5.005;' >/dev/null 2>&1; then
-                       perl5=$tdir/perl
+               elif $test -x $tdir/perl5$exe_ext && $tdir/perl5 -Mless -e 'use 5.005;' >/dev/null 2>&1; then
+                       perl5=$tdir/perl5
                        break;
                fi
        done