--- parser3/src/www/htdocs/Attic/index.html 2001/08/07 13:23:33 1.260
+++ parser3/src/www/htdocs/Attic/index.html 2001/08/28 09:39:30 1.282
@@ -1,5 +1,93 @@
@USE
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[mm2.jpg]]
+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;
@@ -21,7 +109,39 @@ 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($unsorted.a)]
+^sorted.menu{$sorted.a}[,]
+
+ =^dtf:format[aaa-%Y-bbb-%m]=
+
+
+#$ORIGINS(0)
^math:random(3686)
@@ -1633,7 +1753,7 @@ $tt.0
приветприветприветприветприветприветприветприветприветприветприветприветпривет321
')}
}
- $проверка[^table::sql{select test from lotest}(6)]
+ $проверка[^table::sql{select test from lotest}[$.limit(6)]]
^проверка.menu{
# ^проверка.line[]:^untaint[as-is]{$проверка.test}
# ^проверка.line[]:^untaint[html]{$проверка.test}
@@ -1653,8 +1773,8 @@ $tt.0
}[
]
}
-$cookie:reg0[$.value[8reg0]$.expires[session]]
-$cookie:reg1[$.value[8reg1]$.expires[session]]
+#$cookie:reg0[$.value[8reg0]$.expires[session]]
+#$cookie:reg1[$.value[8reg1]$.expires[session]]
$cookie:reg0
$cookie:reg1