--- parser3/www/htdocs/Attic/index.html 2002/11/29 12:13:42 1.193
+++ parser3/www/htdocs/Attic/index.html 2002/12/24 08:31:31 1.206
@@ -20,6 +20,7 @@ $body
OK
@main[]
+#$form:a=
#$a(123)
#^a.format[%.10u]
#$result[111]
@@ -292,7 +293,7 @@ OK
#^includet2overridestatic[]
#^virtualtest2[]
#^message-id-test[]
-^test_exif[jpg]
+#^test_exif[jpg]
#^http_prefix[]
#^http_prefix_table[]
#^http_prefix_xml[]
@@ -302,6 +303,144 @@ OK
#^quickregexatend[]
#^docsamplehttpfileload[]
#^datecreatecolon[]
+#^exifdocsample[]
+#^rusagetv[]
+#^varmethnameconflict[]
+#^mimeold[]
+#^mimenew[]
+#^doctableclonesample[]
+#^manyto[]
+#^strangewrite[]
+#^badexceptiontype[]
+^coookieexpirestest[]
+
+@coookieexpirestest[]
+$cookie:test1[
+ $.value[1]
+ $.expires[session]
+]
+
+$cookie:test1=
+
+
+@badexceptiontype[]
+^connect[mysql://mdm:4b833ljq@db-mysql/mdm]{
+^void:sql{b}
+}
+
+
+@strangewrite[]
+$a[$form:a]
+$ax.b[2]
+$ax.b=
+
+@manyto[]
+^mail:send[
+ $.from[paf@design.ru]
+ $.to[паф , паф дома ]
+# $.bcc[pafhome@design.ru]
+# $.cc[pafhome@design.ru]
+ $.subject[проверка два в to]
+ $.text[привет]
+]
+
+@manyto[]
+^mail:send[
+ $.from[paf@design.ru]
+ $.to[паф ]
+ $.bcc[паф дома ]
+# $.cc[pafhome@design.ru]
+ $.subject[проверка to,bcc]
+ $.text[привет]
+]
+
+@manyto[]
+^mail:send[
+ $.from[paf@design.ru]
+ $.to[паф ]
+# $.bcc[паф дома ]
+ $.cc[паф дома ]
+ $.subject[проверка to,cc]
+ $.text[привет]
+]
+
+@doctableclonesample[]
+$orig[^table::create{name
+Вася
+Коля
+Лена
+Маша
+}]
+
+#сдвигает текущую запись таблицы from на <Коля>
+^orig.offset(1)
+
+#копирует начиная стекущей записи во from, 10 записей максимум
+$copy[^table::create[$orig;
+ $.offset[cur]
+ $.limit(10)
+]]
+
+^copy.menu{$copy.name}[,]
+
+@mimeold[]
+^mail:send[
+ $.from[paf@design.ru]
+ $.to[paf@design.ru]
+ $.text[1
+
+ 2
+
+
+ 3]
+]
+
+@mimenew[]
+^mail:send[
+ $.from[paf@design.ru]
+ $.to[paf@design.ru]
+ $.body[1
+
+ 2
+
+
+ 3]
+]
+
+@varmethnameconflict[]
+$varmethnameconflict[1]
+^varmethnameconflict.format[%03d]
+
+@rusagetv[]
+$s[$status:rusage]
+^s.tv_sec.format[%.0f].^s.tv_usec.format[%06.0f]
+
+@exifdocsample[]
+$image[^image::measure[jpg/DSC00003.JPG]]
+$exif[$image.exif]
+^if($exif){
+ Производитель фотоаппарата, модель: $exif.Make $exif.Model
+ Время съемки: ^exif.DateTimeOriginal.sql-string[]
+ Выдержка: $exif.ExposureTime секунды
+ Диафрагма: F$exif.FNumber
+ Использовалась вспышка: ^if(def $exif.Flash){^if($exif.Flash){да;нет};неизвестно}
+}{
+ нет EXIF информации
+}
+
+@exif_value[value][i]
+^if($value is date){
+ ^value.sql-string[]
+}{
+ ^if($value is hash){
+ ^for[i](0;$value-1){$value.$i}[,]
+ }{
+ $value
+ }
+}
+
+
+
@datecreatecolon[]
#$date[^date::create[2002-12-02 14:30]]