Fix some issues near recent chomp changes. Reviewed-by: Richard Levitte <levitte@openssl.org>
diff --git a/apps/CA.pl.in b/apps/CA.pl.in index fbba457..f5e8e4a 100644 --- a/apps/CA.pl.in +++ b/apps/CA.pl.in
@@ -120,9 +120,9 @@ close OUT; # ask user for existing CA certificate print "CA certificate filename (or enter to create)\n"; - $FILE = <STDIN>; - $FILE = s|\R$|| if $FILE; - if ($FILE) { + $FILE = "" unless defined($FILE = <STDIN>); + $FILE =~ s{\R$}{}; + if ($FILE ne "") { copy_pemfile($FILE,"${CATOP}/private/$CAKEY", "PRIVATE"); copy_pemfile($FILE,"${CATOP}/$CACERT", "CERTIFICATE"); } else {