Commit 32cd4733 authored by Rich Salz's avatar Rich Salz
Browse files

Anchor the regexp match 



Reviewed-by: default avatarRichard Levitte <levitte@openssl.org>
(Merged from https://github.com/openssl/openssl/pull/4483)
parent fa4dd546

apps/CA.pl.in

+1 −1
Original line number Diff line number Diff line
@@ -127,7 +127,7 @@ if ($WHAT eq '-newcert' ) { 
    # create a pre-certificate

    $RET = run("$REQ -x509 -precert -keyout $NEWKEY -out $NEWCERT $DAYS");

    print "Pre-cert is in $NEWCERT, private key is in $NEWKEY\n" if $RET == 0;

} elsif ($WHAT =~ /\-newreq(\-nodes)?/ ) {

} elsif ($WHAT =~ /^\-newreq(\-nodes)?$/ ) {

    # create a certificate request

    $RET = run("$REQ -new $1 -keyout $NEWKEY -out $NEWREQ $DAYS $EXTRA{req}");

    print "Request is in $NEWREQ, private key is in $NEWKEY\n" if $RET == 0;