типо если условие в автомакросе написано в "" (if ($kw =~ /^".*"$/) {$match = 0}), то провеняем полное соответствие текста (консоли или чата) с нашим условием (if ($match == 0 && $text eq $kw) {return 1})if ($kw =~ /^".*"$/) {$match = 0}
elsif ($kw =~ /^\/.*\/\w?$/) {$match = 1}
else {return 0}
($kw, $flag) = $kw =~ /^[\/"](.*?)[\/"](\w?)/;
if ($match == 0 && $text eq $kw) {return 1}
if ($match == 1 && ($text =~ /$kw/ || ($flag eq 'i' && $text =~ /$kw/i))) {
no strict;
foreach my $idx (1..$#-) {setVar(".lastMatch".$idx, ${$idx})}
а вот если условие написано в // (elsif ($kw =~ /^\/.*?\/\w?$/) {$match = 1}), то пробуем подогнать текст (консоли или чата) под шаблон
как это не должно быть? а если это необходимо?в строка_регекспа не должно быть символа /
кстати если символ заэкринировать, то кора не видет этого и жалуестся на строчку:
if ($match == 1 && ($text =~ /$kw/ || ($flag eq 'i' && $text =~ /$kw/i))) {