diff options
author | Michael Osipov <michael.osipov@siemens.com> | 2023-11-30 17:07:03 +0100 |
---|---|---|
committer | Tomas Mraz <tomas@openssl.org> | 2023-12-04 09:42:56 +0100 |
commit | 253c5667a92efbbd1498b2f5b883da23c11b8930 (patch) | |
tree | 739c887fa2c6c6fbe2f605c1b1157d63dedc38d7 /util | |
parent | 8da20b30da42fa8ceb070c6d293fe85e70e68428 (diff) |
Fix detection on HP-UX (IA64)
HPE has a weird preference to prefix letters and zero-padding. Properly trim
them before processing.
CLA: trivial
Reviewed-by: Matt Caswell <matt@openssl.org>
Reviewed-by: Tomas Mraz <tomas@openssl.org>
(Merged from https://github.com/openssl/openssl/pull/22891)
Diffstat (limited to 'util')
-rwxr-xr-x | util/perl/OpenSSL/config.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/util/perl/OpenSSL/config.pm b/util/perl/OpenSSL/config.pm index cda764b4ed..970e65dc97 100755 --- a/util/perl/OpenSSL/config.pm +++ b/util/perl/OpenSSL/config.pm @@ -82,7 +82,7 @@ my $guess_patterns = [ [ 'HP-UX:.*', sub { my $HPUXVER = $RELEASE; - $HPUXVER = s/[^.]*.[0B]*//; + $HPUXVER =~ s/[^.]*.[0B]*//; # HPUX 10 and 11 targets are unified return "${MACHINE}-hp-hpux1x" if $HPUXVER =~ m@1[0-9]@; return "${MACHINE}-hp-hpux"; @@ -322,6 +322,7 @@ sub determine_compiler_settings { # If we got a version number, process it if ($v) { + $v =~ s/[^.]*.0*// if $SYSTEM eq 'HP-UX'; $CCVENDOR = $k; # The returned version is expected to be one of |