[BACK]Return to _bug.html CVS log [TXT] [DIR] Up to [parser3project] / parser3 / www / htdocs

Diff for /parser3/www/htdocs/Attic/_bug.html between versions 1.30 and 1.35

version 1.30, 2004/03/10 10:04:30 version 1.35, 2004/03/25 11:51:19
Line 1 Line 1
 @main[]  @auto[]
 $request:charset[windows-1251]  $request:charset[windows-1251]
 $response:charset[windows-1251]  $response:charset[windows-1251]
 $response:content-type[text/html]  
   
 $xdoc[^xdoc::load[_bug.xml]]  
 #^xdoc.string[]  
 $nodes[^xdoc.select[//x:second][  
         $.x[http://pif.design.ru/]  
 ]]  
 ^nodes._count[]  
   
   
   @main[]
   $table[^table::create{pet
   cat     milk}]
   $hash[^table.hash[pet]]
   ^display[$hash]
   
   @main[]
   ^connect[mysql://root@localhost/paf]{
   
   $hash[^hash::sql{select 'cat' as pet
   #, 'milk' as food
   }]
   ^display_hash[$hash]
   
   
   }
   
   @main[]
   ^connect[mysql://root@localhost/paf]{
           $participants[^hash::sql{select 'feodor' as participant }]
   }
   
   #:даст хеш такой структуры:
   $participantsZ[
           $.alex(1)
           $.boris(1)
   ]
   
   #:из которого можно эффективно извлекать информацию, например, так:
   $person[feodor]
   $person ^if($participants.$person){участвует}{не участвует} в мероприятии
   }
   
   
   @display_hash[hash]
   #$hash.a.a
   ^hash.foreach[k;v]{hash $k=(
   ^if($v is hash){^display_hash[$v]}{
   ^if($v is bool){bool ^if($v){true;false}}{string $v}
   }
   }[,]
   
   )^#0A}]
   
   
   @main[]
   $name[ Вася ]
   "$name"
   "^name.trim[]"
   
   $path[/section/subsection/]
   ^path.trim[end;/]
   
   @main[]
   $xdoc[^xdoc::create{<?xml version="1.0"?>
   <document xmlns:s="urn:special">
           <s:code>string</s:code>
   </document>
   }]
   $xdoc.search-namespaces.s[urn:special]
   ^xdoc.selectString[string(//s:code)]
Removed from v.1.30  
changed lines
  Added in v.1.35

E-mail: