From df40278af8372313dd19f62ef875cf4c6f9e7253 Mon Sep 17 00:00:00 2001 From: lookshe Date: Wed, 7 Mar 2012 20:39:15 +0100 Subject: if nothing found test $query in upper and lower case --- wiki2.pl | 8 +++++++- 1 file changed, 7 insertions(+), 1 deletion(-) diff --git a/wiki2.pl b/wiki2.pl index da88d0e..5563c72 100644 --- a/wiki2.pl +++ b/wiki2.pl @@ -14,6 +14,7 @@ if (!$lang) { $lang = "de"; } my $found = 0; +my $up = 0; my $result; while ($found < 5) { @@ -29,7 +30,12 @@ while ($found < 5) { break; } } else { - break; + if ($up == 0) { + $query = uc $query; + $up = 1; + } else { + $query = lc $query; + } } } if (defined $result) { -- cgit v1.2.3