Diff for /parser3/src/www/htdocs/Attic/index.html between versions 1.496 and 1.528

version 1.496, 2001/12/07 15:24:48 version 1.528, 2002/01/21 17:06:35
Line 1 Line 1
   @auto[]
   $request:charset[windows-1251]
   $response:charset[windows-1251]
   $response:content-type[$.value[text/html]$.charset[$response:charset]]
   
 @main[]  @main[]
 ^tcache2[]  передаетсЯ
   index1.html?cost=252333.22
   
   принимаетсЯ
   ^form:cost.double[]
   
   
   #^xpath[]
   #^ttablesetlang[]
   #^mail3[]
   #^ttime[]
   #^tupper[]
   #^treplace[]
   ^xslt2[]
   #^tcache2[]
 #$ORIGINS(1)  #$ORIGINS(1)
 #$t[^table::set{a b} ^table::set{c d}]  #$t[^table::set{a b} ^table::set{c d}]
 #^ttaintuntaint[]  #^ttaintuntaint[]
Line 75 Line 94
 <hr>  <hr>
 OK  OK
   
   @xpath[]
   $xdoc[^xdoc::set{<?xml version="1.0" encoding="windows-1251" ?>
   <document><block><p>привет</p></block></document>
   }]
   #^show-xdoc2[$xdoc]
   $node[^xdoc.selectSingle[/document/block/p]]
   ^if(def $node){
           ^if($node is string){
                   $node
           }{
           ^if($node is hash){
                   ^node._count[]
           }{
                   $node.nodeType
           }
           }
   #$node.firstChild.nodeValue
   }{
           node not found
   }
   
   
   @ttablesetlang[]
   $a-tab-b[a      b
   1       2]
   
   $t[^table::set{$a-tab-b}]
   =$t.a=
   <hr>
   
   $t[^table::set[nameless]{^taint[$a-tab-b]}]
   =$t.0=
   <hr>
   
   $t[^table::set{^untaint{^taint[$a-tab-b]}}]
   =$t.a=
   
   #^t.append{1    2}
   
   @mail3[]
   ^mail:send[
           $.from[Александр Петросян <paf@design.ru>]
           $.to[Александр Петросян <paf@design.ru>]
           $.subject[проверка4]
           $.body[
                   $.text[
                           $.content-type[$.value[text/plain] $.charset[windows-1251]]
                           $.body[проверка]
                   ]
                   $.attachment[
                           $.value[^file::load[text;index.html]]
                           $.file-name[привет всем.html]                   
                   ]
           ]
   ]
   
   
   @ttime[]
   $now[^date::now[]]
   $now.hour:$now.minute
   
   @tupper[]
   $t[abcABCабвАБВ]
   $t<br>
   ^t.upper[]
   
   @treplace[]
   $copy-paste-clean[^table::set{a b
   .       _
   ,       _
   +       _
   &       _
   ?       _
   =       _}]
   
   $cache_key[^taint[в.а,с+я]&был?тут=недавно.cache]
   # почему-то этот replace роняет апач в 500 ошибку :(
   #^cache_key.replace[$copy-paste-clean]
   $test[abc]
   ^test.save[$cache_key]saved<br>
   $cache[^file:list[.;\.cache^$]]
   ^file:delete[$cache_key]deleted($cache.name)<br>
   
   
   
   @xslt2[]
   $xdoc[^xdoc::set{<?xml version="1.0" encoding="windows-1251" ?>
   <document><block><p>привет</p></block></document>
   }]
   ^show-xdoc2[$xdoc]
   ^show-xdoc2[^xdoc.transform[templates/_document.xslt]]
   <hr>
   
   
 @tcache2[]  @tcache2[]
 ^cache[$DB_HOME/keyключ](2){  ^cache[$DB_HOME/keyключ](2){
         ^math:random(100)          ^math:random(100)
Line 135  $bred[^int::int[]] Line 248  $bred[^int::int[]]
   
 @xloadwrongtable[]  @xloadwrongtable[]
 $constr[^xdoc::load[wrongtable.xml]]  $constr[^xdoc::load[wrongtable.xml]]
   ^show-xdoc2[$constr]
   
 @xsetwrongtable[]  @xsetwrongtable[]
 $constr[^xdoc::set{<?xml version="1.0" encoding="windows-1251z" ?>  $constr[^xdoc::set{<?xml version="1.0" encoding="windows-1251z" ?>
Line 269  $dom_created_in_air[^xdoc::create[doc]] Line 383  $dom_created_in_air[^xdoc::create[doc]]
   
   
 @tcache[]  @tcache[]
 ^rem{  
 #^hashfile:clear[cache]  #^hashfile:clear[cache]
 $code[^hashfile::open[$DB_HOME;cache]]  $code[^hashfile::open[$DB_HOME;cache]]
 ^code.cache[key](2){  ^code.cache[key](2){
         ^math:random(100)          ^math:random(100)
 #       ^code.delete[]  #       ^code.delete[]
 }  }
 }  
   
 @thashfileexp[]  @thashfileexp[]
 $hf[^hashfile::open[$DB_HOME;hashfile]]  $hf[^hashfile::open[$DB_HOME;hashfile]]
Line 697  by id: Line 809  by id:
   
 @show-xdoc2[xdoc]  @show-xdoc2[xdoc]
 ^xdoc.save[out/save.xml;  ^xdoc.save[out/save.xml;
 #       $.encoding[windows-1251]  #       $.encoding[utf-8]
         $.method[xml]          $.method[xml]
 ]  ]
 $file[^xdoc.file[  $file[^xdoc.file[
 #       $.encoding[windows-1251]          $.encoding[utf-8]
         $.method[html]          $.method[html]
 ]]  ]]
 ^file.save[text;out/save_file.html]  ^file.save[text;out/save_file.html]
 #$response:body[^xdoc.file[     $.media-type[text/paf]  ]]  #$response:body[^xdoc.file[     $.media-type[text/paf]  ]]
 <pre>^taint[html][^xdoc.string[  <pre>^taint[html][^xdoc.string[
 #       $.method[html]          $.method[html]
 #       $.version[1.0]  #       $.encoding[utF-8]
 #       $.encoding[utf-8]  
 #       $.omit-xml-declaration[yes]  #       $.omit-xml-declaration[yes]
 #       $.standalone[yes]  #       $.standalone[no]
 #       $.doctype-public[-//W3C//DTD XHTML]  #       -$.doctype-public[-//W3C//DTD XHTML]
 #       $.doctype-system[/a/b/c/]  #       -$.doctype-system[/a/b/c/]
 #       $.indent[no]  #       $.indent[yes]
         $.media-type[text/paf]  #       $.media-type[text/paf]
 ]]  ]]
 </pre>  </pre>
   

Removed from v.1.496  
changed lines
  Added in v.1.528


E-mail: