Diff for /parser3/www/htdocs/Attic/index.html between versions 1.188 and 1.208

version 1.188, 2002/11/28 12:23:39 version 1.208, 2003/01/16 08:44:19
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 296  OK Line 297  OK
 #^http_prefix[]  #^http_prefix[]
 #^http_prefix_table[]  #^http_prefix_table[]
 #^http_prefix_xml[]  #^http_prefix_xml[]
 ^imagefont[]  #^imagefont[]
 #^downloadtest[]  #^downloadtest[]
 #^cachebug[]  #^cachebug[]
 #^quickregexatend[]  #^quickregexatend[]
   ^docsamplehttpfileload[]
   #^datecreatecolon[]
   #^exifdocsample[]
   #^rusagetv[]
   #^varmethnameconflict[]
   #^mimeold[]
   #^mimenew[]
   #^doctableclonesample[]
   #^manyto[]
   #^strangewrite[]
   #^badexceptiontype[]
   #^coookieexpirestest[]
   #^fullpathbug[]
   #^form_fields_modification_bug[]
   #^nbsp_xslt_output[]
   #^mailcharset[]
   
   @mailcharset[]
   ^mail:send[
           $.from[paf@design.ru]
           $.to[paf@mail.design.ru]
           $.subject[проверка]
                   $.charset[koi8-r]
           $.text[
                   $.charset[koi8-r]
                   $.value[проверка]
           ]       
   ]
   
   @nbsp_xslt_output[]
   $input[^xdoc::create[doc]]
   $sheet[^xdoc::create{<?xml version="1.0"?> 
   <xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform" version="1.0">
           <xsl:template match="doc">
                   output&#160^;there
           </xsl:template>
   </xsl:stylesheet>
   }]
   $output[^input.transform[$sheet]]
   #$response:body[^output.file[]]
   ^taint[^output.string[]]
   
   
   @form_fields_modification_bug[]
   $form:fields.foo[bar]
   $form:foo
   <hr>
   
   @fullpathbug[]
   ^file:fullpath[a.gif]
   
   @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[паф <paf@design.ru>, паф дома <pafhome@design.ru>]
   #       $.bcc[pafhome@design.ru]
   #       $.cc[pafhome@design.ru]
           $.subject[проверка два в to]
           $.text[привет]
   ]
   
   @manyto[]
   ^mail:send[
           $.from[paf@design.ru]
           $.to[паф <paf@design.ru>]
           $.bcc[паф дома <pafhome@design.ru>]
   #       $.cc[pafhome@design.ru]
           $.subject[проверка to,bcc]
           $.text[привет]
   ]
   
   @manyto[]
   ^mail:send[
           $.from[paf@design.ru]
           $.to[паф <paf@design.ru>]
   #       $.bcc[паф дома <pafhome@design.ru>]
           $.cc[паф дома <pafhome@design.ru>]
           $.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<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[]
   #$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/x]]
   Программное обеспечение сервера: $file.SERVER
   <hr>
   HTTP status: $file.status<br>
   <pre>$file.text</pre>
   
 @quickregexatend[]  @quickregexatend[]
 #$subject[xxxabcd]  #$subject[xxxabcd]
Line 339  $length[^image.length[$text]] Line 533  $length[^image.length[$text]]
 $response:body[^image.gif[]]  $response:body[^image.gif[]]
   
 @http_prefix_xml[]  @http_prefix_xml[]
  $xdoc[^xdoc::load[http://www.cbr.ru/scripts/XML_daily.asp?date_req=02/03/2002;  $xdoc[^xdoc::load[http://www.cbr.ru/scripts/XML_daily.asp?^taint[сегодня];
 #       $.method[HEAD]      $.headers[
         $.headers[                  $.user-agent[ПАФ]
                 $.user-agent[1]                  $.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>  <pre>^taint[^xdoc.string[]]</pre>
   
 @http_prefix_table[]  @http_prefix_table[]
Line 395  $file[^file:list[$dir;\.(jpe?g|JPE?G)^$] Line 594  $file[^file:list[$dir;\.(jpe?g|JPE?G)^$]
 </table>  </table>
   
 @show_exif_value[value][i]  @show_exif_value[value][i]
 ^if($value is hash){  ^if($value is date){
         ^for[i](0;$value-1){$value.$i}[,]          ^value.sql-string[]
 }{  }{
         $value          ^if($value is hash){
                   ^for[i](0;$value-1){$value.$i}[,]
           }{
                   $value
           }
 }  }
   
   
 @message-id-test[]  @message-id-test[]
 ^mail:send[  ^mail:send[
         $.from[paf@mail]          $.from[paf@mail]

Removed from v.1.188  
changed lines
  Added in v.1.208


E-mail: