--- parser3/src/www/htdocs/Attic/index.html 2001/03/28 09:01:23 1.68 +++ parser3/src/www/htdocs/Attic/index.html 2001/07/25 14:36:04 1.244 @@ -1,112 +1,36 @@ -@auto[] -!!$html-typo[^table:set{user html comment -<< «^; длинные user вперёд ->> »^; -\n\n

!эти есть в таблице по умолчанию -\n
!но т.к. заменяем, надо повторить. -< <^; !можно этим воспользоваться, -> >^; !и что-то сделать ДО обычных замен -" "^; !например из << и >> -& &^; !сделать ёлочки-кавычки. -_  ^; -^#AB «^; windows коды ёлочек -^#BB »^; windows коды ёлочек -(c) ©^; -^#A9 ©^; windows (c) -}] - -@dump[t] -^t.menu{$n
} -


-@func[n] -$n @main[] -^file:find[test.cfg]
-^file:find[tes.cfg]{not found}
-
- -$t[^table:set{n -3 -01.3 -1.2 -2 +^connect[odbc://dsn=voz7^;uid=voz^;pwd=pwd]{ +# ^void:sql{insert into хрен (a) values (1)} + $пресса[^table:sql{select * from press where header='$form:h'}] + ^пресса.menu{ + $пресса.id, $пресса.date_row, $пресса.header, $пресса.short_text^rem{, $пресса.full_text}, $пресса.mode + }[
] +} +
+#$response:status[404] +#$response:location[/inh.html] +#
+$таблица[^table:set{a b +1 2 +11 22 }] -$t{^locate[n;2z]^found{$n}{not found}}
-$t{^locate[n;3]^found{found:$n}{not found}}
-^$t:
-^dump[$t] -^t.sort($n) -^^t.sort(^$n):
-^dump[$t] -^t.sort{^:func($n)} -^^t.sort{^^:func(^$n)}:
-^dump[$t] -^t.sort{$n} -^^t.sort{^$n}:
-^dump[$t] -^t.sort{$n}[desc] -^^t.sort{^$n}[desc]:
-^dump[$t] -
- -^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[] -$response:location[http://parser3/123] +^$таблица.fields.a=$таблица.fields.a
+^$таблица.a=$таблица.a
+
+$n[] +=^n.match[sdf][]{123}= +
+ +=$3= +
+ +$строка[123] +^строка.match[(.);g]{($match.1)} +
+$a{ + $b[1] } - - -
-^^auto_test[]:
-
    -^auto_test[] -
-
- -^${cookie:вот}=${cookie:вот}?
-^$request:query=$request:query
-^$request:uri=$request:uri
- -
-
$form:name
-
- -
- -@default[test;def] -$result[^if(^test.length[]){$test}{$def}] - -@exception[origin;source;comment;type;code] - - -ERROR: -^if(def $source){$origin '$source'} -${comment}. -^if(def $type){type=$type} -^if(def $code){code=$code} - -@auto_test[] -^BASE.auto_test[] -
  • ${request:uri}! \ No newline at end of file +^$b=$b
    +^$a!$a
    +^$b=$b
    +