Diff for /parser3/www/htdocs/Attic/index.html between versions 1.193 and 1.199

version 1.193, 2002/11/29 12:13:42 version 1.199, 2002/12/05 11:23:53
Line 20  $body Line 20  $body
 OK  OK
   
 @main[]  @main[]
   #$form:a=
 #$a(123)  #$a(123)
 #^a.format[%.10u]  #^a.format[%.10u]
 #$result[111]  #$result[111]
Line 292  OK Line 293  OK
 #^includet2overridestatic[]  #^includet2overridestatic[]
 #^virtualtest2[]  #^virtualtest2[]
 #^message-id-test[]  #^message-id-test[]
 ^test_exif[jpg]  #^test_exif[jpg]
 #^http_prefix[]  #^http_prefix[]
 #^http_prefix_table[]  #^http_prefix_table[]
 #^http_prefix_xml[]  #^http_prefix_xml[]
Line 302  OK Line 303  OK
 #^quickregexatend[]  #^quickregexatend[]
 #^docsamplehttpfileload[]  #^docsamplehttpfileload[]
 #^datecreatecolon[]  #^datecreatecolon[]
   #^exifdocsample[]
   #^rusagetv[]
   #^varmethnameconflict[]
   #^mimeold[]
   #^mimenew[]
   ^doctableclonesample[]
   
   @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<br>
       Время съемки: ^exif.DateTimeOriginal.sql-string[]<br>
       Выдержка: $exif.ExposureTime секунды<br>
       Диафрагма: F$exif.FNumber<br>
       Использовалась вспышка: ^if(def $exif.Flash){^if($exif.Flash){да;нет};неизвестно}<br>
   }{
       нет EXIF информации<br>
   }
   
   @exif_value[value][i]
   ^if($value is date){
           ^value.sql-string[]
   }{
           ^if($value is hash){
                   ^for[i](0;$value-1){$value.$i}[,]
           }{
                   $value
           }
   }
   
   
   
   
 @datecreatecolon[]  @datecreatecolon[]
 #$date[^date::create[2002-12-02 14:30]]  #$date[^date::create[2002-12-02 14:30]]

Removed from v.1.193  
changed lines
  Added in v.1.199


E-mail: