=?iso-8859-1?q?=5Bmdk-re=5D_=CF=DB=C9=C2=CB=C1_=D7_=D3=CB=D2=C9=D0=D4=C5?=

[Henri Bourbon]

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

>> $badstring = '[JT]';

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

А еще лучше

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

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

-- 
HB