--- parser3/src/www/htdocs/Attic/index.html 2001/03/22 18:29:21 1.37
+++ parser3/src/www/htdocs/Attic/index.html 2001/03/27 13:47:32 1.61
@@ -1,7 +1,43 @@
+@auto[]
+$html-typo[^table:set{user html comment
+<< «^; длинные user вперёд
+>> »^;
+\n\n !эти есть в таблице по умолчанию
+\n
!но т.к. заменяем, надо повторить.
+< <^; !можно этим воспользоваться,
+> >^; !и что-то сделать ДО обычных замен
+" "^; !например из << и >>
+& &^; !сделать ёлочки-кавычки.
+_ ^;
+^#AB «^; windows коды ёлочек
+^#BB »^; windows коды ёлочек
+(c) ©^;
+^#A9 ©^; windows (c)
+}]
+
@main[]
-$env:REMOTE_ADDR
-$response:paf[k]
-$response:Connection[kla]
+^if(-f index.html){y}{n}
+^taint[html-typo;не знаю
+я ничего
+
+<<слово длинное>>
+
+(c) by Я
+]
+$t[^table:load[/test.cfg]]
+^process[@b[]
+f
+]
+^b[]
+
+^$t.a=$t.a
+^t.offset[2]
+#$r[^t.record[]]
+#^$r.a=$r.a
+
+^$request:uri=$request:uri
+^$env:PATH_INFO=$env:PATH_INFO
+^$env:REMOTE_ADDR=$env:REMOTE_ADDR
^rem{
$response:body[]
@@ -9,20 +45,25 @@ $response:location[http://parser3/123]
}
-^$root_test=$root_test !
-^$site_test=$site_test !
+
+^^auto_test[]:
+
+^auto_test[]
+
+
+
^${cookie:вот}=${cookie:вот}?
^$request:query=$request:query
^$request:uri=$request:uri
@default[test;def]
-^if(^test.length[]){$test}{$def}
+$result[^if(^test.length[]){$test}{$def}]
@exception[origin;source;comment;type;code]
@@ -32,3 +73,8 @@ ERROR:
${comment}.
^if(def $type){type=$type}
^if(def $code){code=$code}
+
+@auto_test[]
+^BASE.auto_test[]
+$request:uri
+