mirror of
https://github.com/openssl/openssl.git
synced 2024-12-21 06:09:35 +08:00
473664aafd
Different tests may use unexpectedly different versions of perl, depending on whether they hardcode the path to the perl executable or if they resolve the path from the environment. This fixes it so that the same perl is always used. Fix some trailing whitespace and spelling mistakes as well. CLA: trivial Reviewed-by: Tomas Mraz <tomas@openssl.org> Reviewed-by: Paul Dale <pauli@openssl.org> (Merged from https://github.com/openssl/openssl/pull/16362)
23 lines
653 B
Perl
23 lines
653 B
Perl
#! /usr/bin/env perl
|
|
|
|
use Config;
|
|
|
|
# Check that the perl implementation file modules generate paths that
|
|
# we expect for the platform
|
|
use File::Spec::Functions qw(:DEFAULT rel2abs);
|
|
|
|
if (!$ENV{CONFIGURE_INSIST} && rel2abs('.') !~ m|\\|) {
|
|
die <<EOF;
|
|
|
|
******************************************************************************
|
|
This perl implementation doesn't produce Windows like paths (with backward
|
|
slash directory separators). Please use an implementation that matches your
|
|
building platform.
|
|
|
|
This Perl version: $Config{version} for $Config{archname}
|
|
******************************************************************************
|
|
EOF
|
|
}
|
|
|
|
1;
|