--- parser3/www/htdocs/Attic/_bug.html	2004/02/18 13:07:55	1.6
+++ parser3/www/htdocs/Attic/_bug.html	2004/03/25 11:51:19	1.35
@@ -1,15 +1,66 @@
-@main[]
-$request:charset[UTF-8]
-#$response:charset[UTF-8]
+@auto[]
+$request:charset[windows-1251]
 $response:charset[windows-1251]
-$response:content-type[$.value[text/html]$.charset[$response:charset]]
-$xdoc[^xdoc::create{<?xml version="1.0" encoding="$request:charset"?>
-<doc>
-исходный
-</doc>
+
+
+@main[]
+$table[^table::create{pet
+cat	milk}]
+$hash[^table.hash[pet]]
+^display[$hash]
+
+@main[]
+^connect[mysql://root@localhost/paf]{
+
+$hash[^hash::sql{select 'cat' as pet
+#, 'milk' as food
 }]
-$xdoc[^xdoc.transform[_bug.xsl]]
-^xdoc.string[]
-^xdoc.save[_bug.xml;$.encoding[koi8-r]]
-<hr>
-$request:charset/$response:charset
\ No newline at end of file
+^display_hash[$hash]
+
+
+}
+
+@main[]
+^connect[mysql://root@localhost/paf]{
+	$participants[^hash::sql{select 'feodor' as participant }]
+}
+
+#:���� ��� ����� ���������:
+$participantsZ[
+	$.alex(1)
+	$.boris(1)
+]
+
+#:�� �������� ����� ���������� ��������� ����������, ��������, ���:
+$person[feodor]
+$person ^if($participants.$person){���������}{�� ���������} � �����������
+}
+
+
+@display_hash[hash]
+#$hash.a.a
+^hash.foreach[k;v]{hash $k=(
+^if($v is hash){^display_hash[$v]}{
+^if($v is bool){bool ^if($v){true;false}}{string $v}
+}
+}[,]
+
+)^#0A}]
+
+
+@main[]
+$name[ ���� ]
+"$name"
+"^name.trim[]"
+
+$path[/section/subsection/]
+^path.trim[end;/]
+
+@main[]
+$xdoc[^xdoc::create{<?xml version="1.0"?>
+<document xmlns:s="urn:special">
+	<s:code>string</s:code>
+</document>
+}]
+$xdoc.search-namespaces.s[urn:special]
+^xdoc.selectString[string(//s:code)]