--- parser3/src/www/htdocs/Attic/index.html 2001/04/11 07:44:19 1.134
+++ parser3/src/www/htdocs/Attic/index.html 2001/11/08 11:52:35 1.467
@@ -1,397 +1,578 @@
-@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
-@twop[a;b]
-($a,$b)
-
-@Zpost-process[data]
-#(
$data)
-^data.match[1][g]{X}
+@main[]
+#^xchildren[]
+#^thashforeach3[]
+#^thashforeach2[]
+#^thashforeach[]
+#^thashdelete[]
+#^connect[mysql://user:pass@cd.rinet.ru/db]{^void:sql{z} }
+#^tappend[]
+#^sappend[]
+#^eval(10\3)
+#^tform[]
+#^formattest[]
+#^filelist[]
+#^connect[mysql://user:pass@host]{ }
+#^безнадёжна_попытка_поправить_непоправимое[]
+#^tcache[]
+#^thashfileexp[]
+^tcounter[]
+#^tablehash[]
+#j^hashfile[]
+#^formclass[]
+#^hren[]
+#^domedit[]
+#^domxslt[]
+#^lsplit2[]
+#^faceesize[]
+#^imageresize[]
+#^ifassignhash[]
+#^tintdefault[]
+#$response:status[404]
+#^ifpasshash[]
+#^movedir[]
+#^replace[]
+#^set[]
+#^hash[]
+#$t[^methresult[]] ->$t
+#^terror[]
+#^ssave[]
+#^calendar[]
+#^thash[]
+#^tdef[]
+#^ford[]
+#^tif[]
+#^image[]
+#^mail2[]
+#^cookie[]
+#^response[]
+#^regexp2[]
+#^ttablerem[]
+#^pcre[]
+#^regexp[]
+#^mail[]
+#^exec[]
+#^fori[]
+^tconnect[]
+^xslt[]
+#^xml[]
+#^header[]
+OK
+
+$constructor[
+
+
+]
-@mt[s;m]
-$m ^if(^s.match[$:m;i]){matches}{does not match} $s
+$constr[^xdoc::set{
+^untaint[as-is]{$constructor}}]
-@main[]
-$form:a
-
-^if($form:photo){
-upload file:
-$face[^image:measure[$form:photo]]
-^$face.src=$face.src
-^$face.width=$face.width
-^$face.height=$face.height
-
-}
-gif file class:
-$face[^image:measure[^file:load[001004paf(c)lena_karin.gif]]]
-^$face.src=$face.src
-^$face.width=$face.width
-^$face.height=$face.height
-^^face.html[]=^face.html[]
-
-gif:
-$face[^image:measure[001004paf(c)lena_karin.gif]]
-^$face.src=$face.src
-^$face.width=$face.width
-^$face.height=$face.height
-^^face.html[]=^face.html[]
-
-jpeg:
-$face[^image:measure[001004paf(c)lena_karin.jpg]]
-^$face.src=$face.src
-^$face.width=$face.width
-^$face.height=$face.height
-^^face.html[^$border(1) ^$ismap(-1)]=^face.html[$border(1) $ismap(-1)]
-
+$children[$constr.documentElement.childNodes]
+^if($children){
+^for[i](1;^children._count[]){
+ $node[$children.$i]
+ $node.nodeName
+}
+}
+
+
+@thashforeach3[]
+$h[
+ $.a[1]
+ $.b[2]
+]
+$c[^table::set{a
+^h.foreach[key;value]{$value
+}}]
+$c.a
+
+@thashforeach2[]
+$h[
+ $.a[1]
+ $.b[2]
+]
+$c[
+^h.foreach[key;value]{
+ $.$key[$value]
+}
+]
+$c.b
-^rem{
-^mail:send[
- $to[paf@design.ru]
- $subject[test]
- $body[test]
+@thashforeach[]
+$h[
+ $.a[1]
+ $.b[2]
]
-
+^h.foreach[key;value]{
+ $key=$value
}
-$e[^file:cgi[env.pl;$t[1]]]
-$e.text
-
-
-^rem{^mail:send[
- $to[paf@design.ru]
- $from[paf@design.ru]
- $body[
- $1[
- $content-type[
- $value[text/plain]
- $charset[windows-1251]
- ]
- $body[привет, PAF.
+@thashdelete[]
+$h[$.a[1] $.b[2]]
+was:
+count=^h._count[]
+b='$h.b'
+
+^h.delete[b]
+
+now:
+count=^h._count[]
+b='$h.b'
+
+@sappend[]
+$test[123]
+^test.save[test]
+^test.save[append;test]
+
+@tappend[]
+$test[^table::set{a b
+a1 b1}]
+^test.save[test]
+$test[^table::set{a b
+a2 b2}]
+^test.save[append;test]
+
+
+@tform[]
+^if(def $form:new_file){y}{n}
+