From mboxrd@z Thu Jan  1 00:00:00 1970
Return-Path: <npecca@yahoo.com>
From: Henri Bourbon <npecca@yahoo.com>
X-Mailer: The Bat! (v1.51) Personal
X-Priority: 3 (Normal)
Message-ID: <6111085450.20010903132910@yahoo.com>
To: AT <mandrake-russian@altlinux.ru>
Subject: Re: [mdk-re] ошибка в скрипте
In-Reply-To: <20010902231708.A8065@localhost.localdomain>
References: <16017926462.20010830204004@mail.ru>
 <7134131578.20010831070326@inbox.ru> <01083113363203.01534@alex>
 <4135652038.20010902215443@globetravel.spb.ru>
 <20010902231708.A8065@localhost.localdomain>
MIME-Version: 1.0
Content-Type: text/plain; charset=koi8-r
Content-Transfer-Encoding: 8bit
X-Return-Path: npecca@yahoo.com
X-MDaemon-Deliver-To: mandrake-russian@altlinux.ru
Sender: mandrake-russian-admin@altlinux.ru
Errors-To: mandrake-russian-admin@altlinux.ru
X-BeenThere: mandrake-russian@altlinux.ru
X-Mailman-Version: 2.0
Precedence: bulk
Reply-To: mandrake-russian@altlinux.ru
List-Help: <mailto:mandrake-russian-request@altlinux.ru?subject=help>
List-Post: <mailto:mandrake-russian@altlinux.ru>
List-Subscribe: <http://altlinux.ru/mailman/listinfo/mandrake-russian>,
	<mailto:mandrake-russian-request@altlinux.ru?subject=subscribe>
List-Id: Linux-Mandrake RE / ALT Linux discussion list <mandrake-russian.altlinux.ru>
List-Unsubscribe: <http://altlinux.ru/mailman/listinfo/mandrake-russian>,
	<mailto:mandrake-russian-request@altlinux.ru?subject=unsubscribe>
List-Archive: <http://altlinux.ru/pipermail/mandrake-russian/>
Date: Mon Sep  3 13:26:01 2001
X-Original-Date: Mon, 3 Sep 2001 13:29:10 +0400
Archived-At: <http://lore.altlinux.org/community/6111085450.20010903132910@yahoo.com/>
List-Archive: <http://lore.altlinux.org/community/>
List-Post: <mailto:mandrake-russian@linuxteam.iplabs.ru>

Sunday, September 02, 2001, 23:17:08, AT wrote:

>> $badstring = '[JT]';

> $badstring = '\[JT\]';
> Иначе будет фильтроваться как m/[JT]/

А еще лучше

$badstring = '[JT]';
...
/\Q$badstring/i  # ищем в Subject _подстроку_, а не регэксп.

Чтобы человек правил "под себя" только $badstring, и при этом мог понятия не
иметь  о  регэкспах  в Perl и не думать, чего там нужно искейпить, а чего --
нет.

-- 
HB