diff options
Diffstat (limited to 'util')
| -rwxr-xr-x | util/perl/OpenSSL/config.pm | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/util/perl/OpenSSL/config.pm b/util/perl/OpenSSL/config.pm index 02b930a0a7..13d1d60fad 100755 --- a/util/perl/OpenSSL/config.pm +++ b/util/perl/OpenSSL/config.pm @@ -354,8 +354,12 @@ sub determine_compiler_settings { if ( $SYSTEM eq 'OpenVMS' ) { my $v = `CC/VERSION NLA0:`; if ($? == 0) { + # The normal releases have a version number prefixed with a V. + # However, other letters have been seen as well (for example X), + # and it's documented that HP (now VSI) reserve the letter W, X, + # Y and Z for their own uses. my ($vendor, $version) = - ( $v =~ m/^([A-Z]+) C V([0-9\.-]+) on / ); + ( $v =~ m/^([A-Z]+) C [VWXYZ]([0-9\.-]+)(:? +\(.*?\))? on / ); my ($major, $minor, $patch) = ( $version =~ m/^([0-9]+)\.([0-9]+)-0*?(0|[1-9][0-9]*)$/ ); $CC = 'CC'; |