--- parser3/src/www/htdocs/Attic/index.html 2001/08/10 07:13:07 1.264
+++ parser3/src/www/htdocs/Attic/index.html 2001/08/28 14:39:50 1.283
@@ -2,6 +2,93 @@
t.p
dtf.p
+@main[]
+#^tfilemove[]
+#^treplace[]
+^measuretest[]
+#^savetest[]
+#^oratestinsert[]
+#^oratestread[]
+#^process_check[]
+#^ffcheck[]^[xxx]
+
+#$ORIGINS(1)
+#^list[]
+#^tests[]
+#^func(0)
+
+@tfilemove[]
+^file:move[a/a;b/b]
+
+@treplace[]
+$шило-на-мыло[^table::set{a b
+шило мыло
+}]
+$строка[бывает шило в задице]
+^строка.replace[$шило-на-мыло]
+
+@measuretest[]
+$im[^image::measure[mm3.gif]]
+x:y=${im.width}:${im.height}
+
+@savetest[]
+$file[^file::load[text;index.html]]
+^file.save[binary;/some/dir/here.dat]
+OK
+
+@oratestinsert[]
+^connect[oracle://mts_admin:admin_pwd@ORACLE.PAF.OFFICE.DESIGN.RU]{
+#^void:sql{create table lobtest(test clob)}
+^void:sql{insert into lobtest values (/**test**/'бу''квы')}
+$table[^table::sql{select * from lobtest}]
+^table.menu{^table.line[] }
+}
+
+@oratestread[]
+^connect[oracle://mts_admin:admin_pwd@ORACLE.PAF.OFFICE.DESIGN.RU]{
+^rem{
+$tables[^table::sql{select table_name from user_tables}]
+^tables.menu{
+ $tables.table_name
+}
+
+}
+$news[^table::sql{select * from news}[$.limit(2)]]
+^rem{
+news columns:
+$news_columns[^news.columns[]]
+^news_columns.menu{
+ $news_columns.column
+}
+
+}
+news description:
+^news.menu{
+
+ $news.description
+}
+}
+
+@process_check[]
+$f[^file::load[text;process.tpl]]
+^process[$f.text]
+
+@ffcheck[]
+^file:find[bug/index.html]{not found}
+
+@list[]
+$list[^file:list[.;.*\.html^$]]
+^list.menu{$list.name
}
+#^list.count[]
+
+@func[param]
+#[local]
+$local(0)
+^local.inc(1)
+#$local($local+1)
+^if($param<10){^func($param+1)}
+=$local=
+
@bannerSSI[][code]
$code[^file::cgi[/../cgi-bin/bbssi.pl;
$.QUERY_STRING[d=1&H=ad1.lbe.ru&pubid=91033&pg=1&vbn=26&num=1&w=-1&h=-1&r=ssi&i=http://go.bb.ru/images/onerror/bb.gif&g=http://www.bb.ru&before=&after=&bafter=]
@@ -22,13 +109,33 @@ document.write('');
-@main[]
+@tests[]
+$ab(123)
+${[ab]}=
+
+$хэш[$.возраст(88)] $достать[$.поле[возраст]] ^хэш.[$достать.поле].format{%05d}
+
+
+$люди[
+ $.вася[
+ $.возраст(45)
+ ]
+]
+$человек[
+ $.поле[возраст]
+]
+
+$люди.вася.[$человек.поле]
+^люди.вася.[$человек.поле].format{%010d}
+
+
+
$unsorted[^table::set{a b
1 1
3 3
2 2
}]
-$sorted[^unsorted.sort($a)[asc]]
+$sorted[^unsorted.sort($unsorted.a)]
^sorted.menu{$sorted.a}[,]
=^dtf:format[aaa-%Y-bbb-%m]=