From: minima Date: Tue, 25 Feb 2003 15:20:29 +0000 (+0000) Subject: make search for priv case independent X-Git-Tag: PRE-1-52~43 X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=commitdiff_plain;h=14a9a81ec729e7b3c78d775cc76882e7122fcf2d;p=spider.git make search for priv case independent --- diff --git a/perl/Script.pm b/perl/Script.pm index 434109ce..3128dcde 100644 --- a/perl/Script.pm +++ b/perl/Script.pm @@ -56,7 +56,7 @@ sub run } else { dbg($_) for @out; } - last if @out && $l =~ /^pri?v?/; + last if @out && $l =~ /^pri?v?/i; } } }