--- parser3/src/www/htdocs/Attic/index.html 2001/03/25 10:14:41 1.56
+++ parser3/src/www/htdocs/Attic/index.html 2001/03/29 17:11:44 1.77
@@ -1,5 +1,5 @@
@auto[]
-$html-typo[^table:set{user html comment
+!!$html-typo[^table:set{user html comment
<< «^; длинные user вперёд
>> »^;
\n\n
!эти есть в таблице по умолчанию
@@ -12,10 +12,67 @@ _  ^;
^#AB «^; windows коды ёлочек
^#BB »^; windows коды ёлочек
(c) ©^;
+^#A9 ©^; windows (c)
}]
-^html-typo.save[a]
+@dump[t]
+#^t.menu{$n
}
+
+@func[n]
+$n
+@twop[a;b]
+($a,$b)
@main[]
+$a[vasya]
+^^"$a".lsplit[as]=
+$as[^a.lsplit[as]]
+^as.menu{$0;,}
+^^a.pos(sy]="^a.pos[sy]"
+^^a.pos[zsy]="^a.pos[zsy]"
+^^a.left(3)="^a.left(3)"
+^^a.right(3)="^a.right(3)"
+^^a.mid(1;3)="^a.mid(1;3)"
+
+^twop[a;]
+^$request:browser.type=$request:browser.type
+^$request:browser.version=$request:browser.version
+
+$tf[^file:load[test.zip;abc.zip]]
+^$tf.name=$tf.name
+^$tf.size=$tf.size
+^$tf.mime-type=$tf.mime-type
+^$tf.text:
+$tf.text
+
+^file:find[test.cfg]
+^file:find[tes.cfg]{not found}
+
+
+$t[^table:set{n
+3
+01.3
+1.2
+2
+}]
+#$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;не знаю
я ничего
@@ -30,6 +87,9 @@ 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
@@ -54,7 +114,7 @@ $response:location[http://parser3/123]
@@ -72,5 +132,4 @@ ${comment}.
@auto_test[]
^BASE.auto_test[]
-$request:uri
-
+${request:uri}!
\ No newline at end of file