--- parser3/www/htdocs/Attic/index.html	2002/06/28 09:59:03	1.82
+++ parser3/www/htdocs/Attic/index.html	2002/08/09 11:55:45	1.103
@@ -4,9 +4,9 @@
 @auto[filespec]
 $selffilespec[$filespec]
 #$form:here
-$request:charset[windows-1251]
-$response:charset[windows-1251]
-$response:content-type[$.value[text/html]$.charset[$response:charset]]
+#$request:charset[UTF-8]
+#$response:charset[windows-1251]
+#$response:content-type[$.value[text/html]$.charset[$response:charset]]
 
 #@postprocess[body]
 #<b>$body</b>
@@ -18,8 +18,15 @@ $response:content-type[$.value[text/html
 #$result[111]
 #^f[a]
 #^connect[mysql://mdm:4b833ljq@db-mysql/mdm]{
-#	^int:sql{select news_id from news where news_id=-1}[$.default{2}]<br>
+#	^int:sql{select news_id from news where news_id=-1}[
+##	$.default{2}
+#	]<br>
 #    ^string:sql{select news_id from news where news_id=-1}[$.default{2}]
+#	^file::load[text;^string:sql{select '^^hello[]' }]
+#	^string:sql{select '^^hello[]' }] $ORIGINS(1)
+#	^process{	^^h[]}
+#	^process{^string:sql{select '1
+#	^^hello[]' }]	}
 #}
 #^eval(2)
 #^tcrashlocaljunctionsv2[]
@@ -41,7 +48,6 @@ $response:content-type[$.value[text/html
 #^subjvaltest[]
 #^tableselect0[]
 #^memnotest1[]
-#^transparams[]
 #^voidparams[]
 #^rolls2[]
 #^cacheexpireschanging[]
@@ -71,7 +77,6 @@ $response:content-type[$.value[text/html
 #^precisionProblem[]
 #^xpath[]
 #^ttablesetlang[]
-#^mail3[]
 #^ttime[]
 #^tupper[]
 #^treplace[]
@@ -129,7 +134,6 @@ $response:content-type[$.value[text/html
 #$t[^methresult[]] ->$t
 #^terror[]
 #^ssave[]
-#^calendar[]
 #^thash[]
 #^tdef[]
 #^ford[]
@@ -183,13 +187,126 @@ $response:content-type[$.value[text/html
 #^tfilespec[]
 #^tcrypt[]
 #^cryptdocsample[]
-#^sendtests[]
 #^tnormalize[]
-^xmltransformbyxdoc[]
+#^xmltransformbyxdoc[]
 #^sergestrandef[]
+#^tstdin[]
+#^tfind[]
+#^mimet[]
+#^cgit[]
+#^joinlimit[]
+#^tableclonelimit[]
+#^transparams[]
+#^sendtests[]
+#^wwrapperpass[]
+#^badpos[]
+#^processtest[]
+#^mail3[]
+#^mail4[]
+#^datesaving[]
+#^badconstructor[]
+#^calendar[]
+^monthdays(8)
 <hr>
 OK
 
+@monthdays[month]
+$from[^date::create(2000;$month;1)]
+$to[^date::create($from)] ^to.roll[month](+1)
+$result($to-$from)
+
+@badconstructor[]
+^date::now[]
+
+@datesaving[]
+$now[^date::now[]]
+$now.daylightsaving<br>
+$now.yearday<br>
+#
+$date[^date::create(2002;1;3)]
+$date.daylightsaving<br>
+$date.yearday
+
+@mail4[]
+^mail:send[
+	$.from[paf@mail.design.ru]
+	$.to[paf@mail.design.ru]
+	$.subject[^taint[uri][москва]=2]
+	$.text[^taint[uri][москва]=]
+	$.html{<a href=http://there.ru/?city=^taint[uri][Москва]>link</a>}
+]
+@processtest[]
+    $f[^file::load[text;piece.p]]	^process{$f.text}
+	$ORIGINS(1)
+
+
+@badpos[]
+$s[123]
+^s.mid(0;2)
+
+@wwrapperpass[]
+$h[^hash::create[]]
+$h.a(1)
+^my_method[^if(1){$h}]
+работает. так и должно быть?
+
+@my_method[p]
+^p._count[]
+
+
+@tableclonelimit[]
+$source[^table::create{a
+aa
+bb
+cc}]
+^source.offset(1)
+#$dest[^table::create[$source]]
+$dest[^table::create[$source;$.offset(2)]]
+$dest[^table::create[$source;$.limit(2)]]
+$dest[^table::create[$source;$.offset(1)$.limit(1)]]
+$dest[^table::create[$source;$.offset(1)$.limit(2)]]
+$dest[^table::create[$source;$.offset[cur]$.limit(2)]]
+
+^dest.menu{$dest.a}[,]<br>
+
+@joinlimit[]
+$source[^table::create{a
+aa
+bb
+cc}]
+^source.offset(2)
+$dest[^table::create{a
+xx
+}]
+#^dest.join[$source]
+#^dest.join[$source;$.offset(2)]
+#^dest.join[$source;$.limit(2)]
+#^dest.join[$source;$.offset(1)$.limit(1)]
+#^dest.join[$source;$.offset(1)$.limit(2)]
+#^dest.join[$source;$.offset[cur]$.limit(1)]
+^dest.join[$source;$.limit(0)]
+
+^dest.menu{$dest.a}[,]<br>
+
+@cgit[]
+$f[^file::cgi[showenv.cmd]]
+$f.HELLO=<br>
+$f.CONTENT-TYPE=<br>
+$f.content-type=<br>
+
+
+@mimet[]
+$f[^file::stat[a.GIF]]
+$f.content-type
+
+
+@tfind[]
+^file:find[index.html]
+
+@tstdin[]
+$f[^file::exec[test.pl;$.stdin[проверка stdin потока]]]
+<pre>$f.text</pre>
+
 @sergestrandef[]
 $sQuantity[ ]
 ^sQuantity.int(10)
@@ -261,12 +378,12 @@ $s[^for[i](0;999){фрагмент }]
 #^normalized.match[фраг][g]{перга}
 
 @sendtests[]
-#^text[]
+^text[]
 #^html[]
 #^text-n-html[]
 #^file[]
 #^text-n-file[]
-^text-n-html-n-file[]
+#^text-n-html-n-file[]
 #^backwardcomp[]
 
 @backwardcomp[]
@@ -1122,13 +1239,13 @@ $t[^table::set{^untaint{^taint[$a-tab-b]
 
 @mail3[]
 ^mail:send[
-	$.from[Александр Петросян <paf@design.ru>]
-	$.to[Александр Петросян <paf@design.ru>]
-	$.subject[проверка4]
+	$.from[Александр Петросян <paf@mail.design.ru>]
+	$.to[Александр Петросян <paf@mail.design.ru>]
+	$.subject[проверка2]
 	$.body[
 		$.text[
 			$.content-type[$.value[text/plain] $.charset[windows-1251]]
-			$.body[проверка]
+			$.body[проверка^taint[uri][москва]=]
 		]
 		$.attachment[
 			$.value[^file::load[text;index.html]]
@@ -1587,10 +1704,12 @@ $abc[abc]
 ^abc.save[abc]
 
 @calendar[]
-2001;11:<br>
-$week_days[^date:calendar[rus](2001;11)]
+$year(2002)
+$month(12)
+${year}-${month}:<br>
+$week_days[^date:calendar[rus]($year;$month)]
 <pre>
-^week_days.menu{^for[wday](0;7){^if($week_days.$wday){$week_days.$wday;&nbsp^;&nbsp^;} }<br>}
+^week_days.menu{^for[wday](0;6){^if($week_days.$wday){$week_days.$wday;&nbsp^;&nbsp^;} }=$week_days.week,$week_days.year=<br>}
 </pre>
 
 @thash[]