Diff for /parser3/src/www/htdocs/Attic/index.html between versions 1.172 and 1.310

version 1.172, 2001/05/08 06:42:58 version 1.310, 2001/09/11 09:26:44
Line 1 Line 1
 @main[]  @main[]
 $t2[^table:set{key      a       b  ^testdom4[]
 1       a1      b1  #^testdom3[]
 2       a2      b2  #^testdom2[]
 }]  #^testdom1[]
 ^t2.record[]  #^testdom0[]
 <hr>  OK
 #^OP:eval(1<2)  
   @testdom4[]
 $filelist[^table:dir[.]]  $dom[^dom::set{<?xml version="1.0" encoding="windows-1251"?>
 <hr>  
 $path[/news/tululu/]  
 #^path.flip[]  
 <hr>  
 $branches[^table:set{name       val  
 index.cgihtml   123  
 }]  
 $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  <doc>testing проверка ПРОВЕРКА. ^$form:a='$form:a'</doc>
 /here   Here  
 }]  }]
 $t2{^menu{${dir}-$title}[,]}  $response:body[^dom.file[$.encoding[windows-1251]]]
 <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  
   
   @testdom3[]
   $dom[^dom::load[test.xml]]
   $dom[^dom.xslt[test.xsl;$.param1(48)]]
   $dom[^dom.xslt[test.xsl;$.param1(48)]]
   
   @testdom2[]
   $dom[^dom::load[test.xml]]
   #^dom.save[$.encoding[windows-1251];write.xml]
   #^dom.save[;write.xml]
   ^dom.save[$.encoding[windows-1251] $.method[xml];write.xml]
   ^dom.save[$.encoding[windows-1251] $.method[html];write.html]
   ^dom.save[$.encoding[windows-1251] $.method[text];write.txt]
   
   @testdom1[]
   $dom[^dom::load[test.xml]]
   $dom[^dom.xslt[test.xsl;$.param1(48)]]
   $response:body[^dom.file[$.encoding[windows-1251]]]
   
   @testdom0[]
   $dom[^dom::load[test.xml]]
   ^dom.save[$.encoding[windows-1251];write.xml]
   ^dom.string[$.encoding[windows-1251]]
   $файл[^dom.file[$.encoding[windows-1251]]]
   ^файл.save[binary;writefile.xml]
   $response:body[$файл]
   OK
   

Removed from v.1.172  
changed lines
  Added in v.1.310


E-mail: