--- parser3/www/htdocs/Attic/index.html	2002/11/25 14:57:33	1.180
+++ parser3/www/htdocs/Attic/index.html	2002/11/29 12:13:42	1.193
@@ -292,18 +292,81 @@ OK
 #^includet2overridestatic[]
 #^virtualtest2[]
 #^message-id-test[]
-#^test_exif[jpg]
-^http_prefix[]
+^test_exif[jpg]
+#^http_prefix[]
 #^http_prefix_table[]
 #^http_prefix_xml[]
+#^imagefont[]
+#^downloadtest[]
+#^cachebug[]
+#^quickregexatend[]
+#^docsamplehttpfileload[]
+#^datecreatecolon[]
+
+@datecreatecolon[]
+#$date[^date::create[2002-12-02 14:30]]
+#$date[^date::create[2002-12-02]]
+#$date[^date::create[2002:12:02 13:30]]
+$date[^date::create[2002:12:02]]
+#$date[^date::create[12:02]]
+^date.sql-string[]
+
+@docsamplehttpfileload[]
+$file[^file::load[text;http://parser.ru/]]
+Ïðîãðàììíîå îáåñïå÷åíèå ñåðâåðà: $file.SERVER
+<hr>
+<pre>$file.text</pre>
+
+@quickregexatend[]
+#$subject[xxxabcd]
+#^if(^subject.match[^(?>.*)(?<=abcd)]){y;n}
+$subject[^for[i](0;1000){xxxxxyyyyy}   ]
+^for[j](0;1000){
+#$trimmed[^subject.match[\s+^$][]{}]
+#$table[^subject.match[^(.*\S)\s+^$]]
+$table[^subject.match[^(.*\S)\s+^$]]
+$trimmed[$table.1]
+}
+^untaint[html]{"$trimmed"}
+#$table[^subject.match[^(.*?)\s+^$]]
+#^untaint[html]{"$table.1"}
+
+
+@cachebug[]
+^cache[test](10){body}
+
+@downloadtest[]
+$response:body[^file::load[binary;index.html]]
+
+
+@imagefont[]
+$image[^image::create(200;30;0x00FFFF)]
+height(font)=1950<br>
+$alph[ ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyzÀÁÂÃÄÅÆÇÈÉÊËÌÍÎÏÐÑÒÓÔÕÖ×ØÙÚÛÜÝÞßàáâãäåæçèéêëìíîïðñòóôõö÷øùúûüýþÿ0123456789-+=!\"%:,.^;<>?@()^[^]'&*/]
+^^alph.length[]=^alph.length[]<br>
+^eval(1950/^alph.length[])[%.10f]
+
+^image.font[$alph;font.gif](20)
+$text[AÏðèâåò*]
+^image.text(0;0)[$text]
+$length[^image.length[$text]]
+#^image.rectangle(0;50)(2;2)(0x000000)
+^image.rectangle(0;0)($length-1;5)(0x000000)
+$response:body[^image.gif[]]
 
 @http_prefix_xml[]
- $xdoc[^xdoc::load[http://www.cbr.ru/scripts/XML_daily.asp?date_req=02/03/2002;
-# 	$.method[HEAD]
- 	$.headers[
- 		$.user-agent[1]
- 	]
+$xdoc[^xdoc::load[http://www.cbr.ru/scripts/XML_daily.asp?^taint[ñåãîäíÿ];
+    $.headers[
+		$.user-agent[ÏÀÔ]
+		$.accept-test[$.value[çíà÷åíèå]$.with-option[îïöèÿ]]
+	]
 ]]
+Íà ^xdoc.selectString[string(/ValCurs/@Date)]
+êóðñ âàëþòû
+$USD_node[^xdoc.selectSingle[/ValCurs/Valute[CharCode='USD']]]
+"^USD_node.selectString[string(Name)]" ðàâåí ^USD_node.selectString[string(Value)]
+
+<hr>
 <pre>^taint[^xdoc.string[]]</pre>
 
 @http_prefix_table[]
@@ -315,11 +378,13 @@ $table[^table::load[nameless;http://www.
 @http_prefix[]
 #$file[^file::load[text;http://www.artlebedev.ru]]
 #$file[^file::load[text;http://www.artlebedev.ru;alt]]
+#$file[^file::load[text;http://parser3/exif.html;
 $file[^file::load[text;http://parser3/none;
 	$.headers[
 		$.USER-AGENT[paf]
 	]
 ]]
+server: $file.SERVER<br>
 $file.status
 <hr>
 <pre>$file.text</pre>
@@ -351,13 +416,16 @@ $file[^file:list[$dir;\.(jpe?g|JPE?G)^$]
 </table>
 
 @show_exif_value[value][i]
-^if($value is hash){
-	^for[i](0;$value-1){$value.$i}[,]
+^if($value is date){
+	^value.sql-string[]
 }{
-	$value
+	^if($value is hash){
+		^for[i](0;$value-1){$value.$i}[,]
+	}{
+		$value
+	}
 }
 
-
 @message-id-test[]
 ^mail:send[
 	$.from[paf@mail]