Revision 31157bc0b46e04227b8468d3e6915e4d0332777c authored by Richard Levitte on 07 February 2023, 13:43:33 UTC, committed by Richard Levitte on 07 February 2023, 13:43:33 UTC
Reviewed-by: Tomas Mraz <tomas@openssl.org> Release: yes
1 parent 8c0eaea
unix-checker.pm
#! /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 (rel2abs('.') !~ m|/|) {
die <<EOF;
******************************************************************************
This perl implementation doesn't produce Unix like paths (with forward slash
directory separators). Please use an implementation that matches your
building platform.
This Perl version: $Config{version} for $Config{archname}
******************************************************************************
EOF
}
1;
Computing file changes ...
