fa1d7f7
--- test.pl~	2003-08-17 10:27:54.000000000 +0300
fa1d7f7
+++ test.pl	2004-10-12 00:19:42.761693459 +0300
fa1d7f7
@@ -187,7 +187,7 @@
fa1d7f7
 $ENV{RND_SEED} = '1234567890123456789012345678901234567890';
fa1d7f7
 print &test('14 www.bacus.pt',
fa1d7f7
 	    &Net::SSLeay::sslcat("www.bacus.pt", 443,
fa1d7f7
-				 "get\n\r\n\r") =~ /<TITLE>/);
fa1d7f7
+				 "get\n\r\n\r") =~ /<TITLE>/i);
fa1d7f7
 
fa1d7f7
 sub test_site ($$) {
fa1d7f7
     my ($test_nro, $site) = @_;