и снова о @postprocess

dimka 12.08.2003 16:42

#######
@postprocess[buffer][attr_string;code;code_num;replace]

$code[^buffer.match[<(pre|script)(.*?)>(.+?)</\1>][ig]]


$code_num(1)

$replace{<^match.1.lower[]$match.2>$code_num</^match.1.lower[]>^code_num.inc(1)}
$buffer[
^buffer.match[<(pre|script)(.*?)>(.+?)</\1>][ig]{$replace}
]

$buffer[^trim[$buffer]]

$attr_string[class|align|width|bgcolor|border|cellpadding|cellspacing]
$buffer[^buffer.match[($attr_string)="(.+?)"][ig]{$match.1=$match.2}]


$buffer[^buffer.match[(\s{2,})][g]{^match.1.left(1)}]



$replace{<${match.1}$match.2>^taint[as-is][$code.3]</$match.1>^code.offset(1)}
$result[^buffer.match[<(pre|script)(.*?)>(\d+)</\1>][g]{$replace}]

@trim[str;char][chr;tbl]
^if(def $str){
$chr[^if(def $char){$char}{\s}]
$str[^str.match[^^$chr*][]{}]
# $result[^str.match[$chr+^$][]{}]
# нв  . ?_-  бгй_бвў_--R Ўлбва__ -  ЎR<миЁе в_Єбв е
$tbl[^str.match[^^(.*[^^$chr])$chr*^$]]
$result[$tbl.1]
}{
$result[]
}


в чем собственно проблема. Вставляю этот код в auto.p который лежит рядом с парсером. Ноль не работает. То есть смотрю статистику по странице символов осталось столько же как и без @postprocess...

Вставляю в auto.p который лежит в www тоже самое(предварительно убал из другого auto.p)

Пытылся вставить в страницу убрав всё из auto.p ругается

[Tue Aug 12 16:31:00 2003] /: x:/home/2nr/www/index.html(97:1): parse error, expecting `$' [parser.compile] то есть он ругается на
строку

@postprocess[buffer][attr_string;code;code_num;replace]

почему так? :(

---