Fix some issues near recent chomp changes.

[openssl.git] / util / selftest.pl

diff --git a/util/selftest.pl b/util/selftest.pl
index 7b32e9f4ff2a1cbdecdabb0f7a21d510bf209b38..06d494a2fb93e13c54fc46e242ccced85eb485be 100644 (file)
--- a/util/selftest.pl
+++ b/util/selftest.pl
@@ -54,7 +54,7 @@ $cversion=`$cc -V |head -1` if $cversion =~ "Error";
 $cversion=`$cc --version` if $cversion eq "";
 $cversion =~ s/Reading specs.*\n//;
 $cversion =~ s/usage.*\n//;
-chomp $cversion;
+$cversion =~ s|\R$||;
 
 if (open(IN,"<CHANGES")) {
     while(<IN>) {
@@ -199,3 +199,4 @@ while (<IN>) {
 }
 print "\nTest report in file $report\n";
 
+die if $ok != 2;