--- parser3/src/www/htdocs/Attic/index.html 2001/03/19 19:17:48 1.20 +++ parser3/src/www/htdocs/Attic/index.html 2001/07/31 14:22:00 1.251 @@ -1,18 +1,100 @@ @main[] -
-^$cookie:test-default1=$cookie:test-default1
-^$cookie:test-default2=$cookie:test-default2
-^$cookie:test-tomorrow=$cookie:test-tomorrow
-^$cookie:test-session=$cookie:test-session
-
-$cookie:test-default1[value=1]
-$cookie:test-default2[$value[value=2]]
-$cookie:test-tomorrow[$value[value=3] $expires(1)]
-$cookie:test-session[$value[value=8] $expires[session]]
-z
-$t[^table:set{a b
-$form:ta 12
-12 22
+^connect[pgsql://paf:paf123@six/paf]{
+# ^void:sql{create table lotest (test oid)}
+ ^void:sql{insert into lotest (test) values (/*:test*/'пр\'иве')}
+ $проверка[^table::sql{select test from lotest}]
+ ^проверка.menu{
+# ^проверка.line[]:^untaint[as-is]{$проверка.test}
+# ^проверка.line[]:^untaint[html]{$проверка.test}
+# ^проверка.line[]:$проверка.test
+ ^проверка.line[]:$проверка.test
+ }[
]
+
+
+^rem{
+# ^void:sql{create table texttest (body text)}
+ ^void:sql{insert into texttest (body) values ('приветприветприветприветприветприветприветприветприветприветприветприветпривет
+приветприветприветприветприветприветприветприветприветприветприветприветпривет
+приветприветприветприветприветприветприветприветприветприветприветприветпривет
+приветприветприветприветприветприветприветприветприветприветприветприветпривет
+приветприветприветприветприветприветприветприветприветприветприветприветпривет
+приветприветприветприветприветприветприветприветприветприветприветприветпривет
+приветприветприветприветприветприветприветприветприветприветприветприветпривет
+приветприветприветприветприветприветприветприветприветприветприветприветпривет
+приветприветприветприветприветприветприветприветприветприветприветприветпривет
+приветприветприветприветприветприветприветприветприветприветприветприветпривет
+приветприветприветприветприветприветприветприветприветприветприветприветпривет
+приветприветприветприветприветприветприветприветприветприветприветприветпривет
+приветприветприветприветприветприветприветприветприветприветприветприветпривет
+приветприветприветприветприветприветприветприветприветприветприветприветпривет
+приветприветприветприветприветприветприветприветприветприветприветприветпривет
+приветприветприветприветприветприветприветприветприветприветприветприветпривет
+приветприветприветприветприветприветприветприветприветприветприветприветпривет
+приветприветприветприветприветприветприветприветприветприветприветприветпривет
+приветприветприветприветприветприветприветприветприветприветприветприветпривет
+приветприветприветприветприветприветприветприветприветприветприветприветпривет
+приветприветприветприветприветприветприветприветприветприветприветприветпривет
+приветприветприветприветприветприветприветприветприветприветприветприветпривет
+приветприветприветприветприветприветприветприветприветприветприветприветпривет
+')}
+ $проверка[^table::sql{select * from texttest}]
+ ^проверка.menu{
+ ^проверка.line[]:$проверка.body
+ }[
]
+
+}
+# ^void::sql{insert into хрен (a) values (1)}
+ 2*2=$id(^int:sql{select 2*2})
+ $id
+
+ $пресса[^table::sql{select * from aaa}]
+# $a[^пресса.columns[]]^a.menu{$a.column}
+ ^пресса.menu{
+ $пресса.val
+ }[
]
+}
+
+$cookie:reg0[$.value[8reg0]$.expires[session]]
+$cookie:reg1[$.value[8reg1]$.expires[session]]
+$cookie:reg0
+$cookie:reg1
+
+
+^connect[odbc://dsn=voz7^;uid=voz^;pwd=pwd]{
+# ^void::sql{insert into хрен (a) values (1)}
+ $id(^int:sql{select 5})
+ $id
+
+ $пресса[^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.a="$t.a"
-^$t.b="$t.b"
\ No newline at end of file
+^$таблица.fields.a=$таблица.fields.a
+^$таблица.a=$таблица.a
+
+$n[z]
+=^n.match[sdf][]{123}=
+
+
+=$3=
+
+
+$строка[123]
+^строка.match[(.);g]{($match.1)}
+
+$a{
+ $b[1]
+}
+^$b=$b
+^$a!$a
+^$b=$b
+