diff --git a/tests/libtest/test1013.pl b/tests/libtest/test1013.pl
index 9ea7de02d..2f67717c5 100755
--- a/tests/libtest/test1013.pl
+++ b/tests/libtest/test1013.pl
@@ -14,7 +14,7 @@ my $curl_protocols="";
 open(CURL, "$ARGV[1]") || die "Can't get curl $what list\n";
 while( <CURL> )
 {
-    $curl_protocols = lc($_) if ( /$what:/i );
+    $curl_protocols = lc($_ =~ s/\r//) if ( /$what:/i );
 }
 close CURL;