Diff for /parser3/src/www/htdocs/Attic/index.html between versions 1.176 and 1.308

version 1.176, 2001/05/08 10:39:27 version 1.308, 2001/09/11 08:49:22
Line 1 Line 1
 @main[]  @main[]
 $t1[^table:set{key      value  #^testdom3[]
 1       v1  #^testdom2[]
 2       v2}]  #^testdom1[]
 $h1[^t1.hash[key]]  ^testdom0[]
 ^h1.default[$value[nothing]]  OK
 ^$h1.2.value=$h1.2.value<br>  
 ^$h1.2x.value=$h1.2x.value<br>  @testdom3[]
 <hr>  $dom[^dom::load[test.xml]]
 $t2[^table:set{key      a       b  $dom[^dom.xslt[test.xsl;$.param1(48)]]
 1       a1  $dom[^dom.xslt[test.xsl;$.param1(48)]]
 2       a2      b2  
 }]  @testdom2[]
 t2 ^if(^t2.empty[]){empty}{not empty}<br>  $dom[^dom::load[test.xml]]
 ^t2.offset(1)  #^dom.save[$.encoding[windows-1251];write.xml]
 $t2.b  #^dom.save[;write.xml]
 $r[^t2.record[]]  ^dom.save[$.encoding[windows-1251] $.method[xml];write.xml]
 <hr>  ^dom.save[$.encoding[windows-1251] $.method[html];write.html]
 $th[^t2.hash[b]]  ^dom.save[$.encoding[windows-1251] $.method[text];write.txt]
 ^$th.b2.a=$th.b2.a<br>  
 <hr>  @testdom1[]
 $th[^t2.hash[key;a]]  $dom[^dom::load[test.xml]]
 ^$th.2.a=$th.2.a<br>  $dom[^dom.xslt[test.xsl;$.param1(48)]]
 <hr>  $response:body[^dom.file[windows-1251]]
 #^OP:eval(1<2)  
   @testdom0[]
 $filelist[^table:dir[.]]  $dom[^dom::load[test.xml]]
 <hr>  ^dom.save[$.encoding[windows-1251];write.xml]
 $path[/news/tululu/]  ^dom.string[$.encoding[windows-1251]]
 #^path.flip[]  $файл[^dom.file[$.encoding[windows-1251]]]
 <hr>  ^файл.save[binary;writefile.xml]
 $branches[^table:set{name       val  $response:body[$файл]
 index.cgihtml   123  OK
 }]  
 $splitURI[^request:uri.lsplit[/]]  
 name ^if(^branches.locate[name;$splitURI.1]){found;not found}:  
 $branches.name  
 <HR>  
 $splitURI[^request:uri.lsplit[/]]  
 $splitURI.0!$splitURI.1  
 <HR>  
   
 $t2[^table:set{dir      title  
 /here   Here  
 }]  
 $t2{^menu{${dir}-$title}[,]}  
 <HR>  
 $dir[news]  
 $list[^table:dir[$dir]]  
 ^list.menu{  
     $subdir[$dir/$list.name]  
         $sublist[^table:dir[$subdir]]  
         ${list.name}/ $sublist{^menu{$name}[,]}<br>  
 }  
 <HR>  
 ^t[x]  
 <HR>  
 ^if(in "/otherdeeper"){y;n}  
 <HR>  
 ^$form:проверка_имя=$form:проверка_имя<BR>  
 <form method=post>  
 <input name=проверка_имя value=проверка_значение>  
 <input type=submit>  
 </form>  
 <HR>  
   
 ^^table:dir[/]:<BR>  
 $d[^table:dir[/]]  
 $d{^menu{$name &nbsp^;&nbsp^;&nbsp^;&nbsp^;^if(-f $name){-f} ^if(-d $name){-d};<BR>}}  
 <HR>  
   
 $files[^table:set{name}]  
 $d{^menu{  
     ^if(-d "$name"){  
         ^:files.append{$name}  
     }  
 }}  
   
 $files{^menu{$name}[,]}  
 <HR>  
   
 @exception[origin;source;comment;type;code][i;j]  
 <body bgcolor=black>  
 <font color=white>  
 ERROR:  
 ^if(def $source){$origin '$source'}  
 ${comment}.  
 ^if(def $type){type=$type}  
 ^if(def $code){code=$code}  
   
 @auto_test[]  
 ^BASE.auto_test[]  
 <li>${request:uri}!  
   
 @t[a]  
 -${a}-  
 @end  
   
   

Removed from v.1.176  
changed lines
  Added in v.1.308


E-mail: