|
|
| version 1.41, 2001/03/23 13:27:56 | version 1.310, 2001/09/11 09:26:44 |
|---|---|
| Line 1 | Line 1 |
| @main[] | @main[] |
| ^testdom4[] | |
| $t[^table:load[/test.cfg]] | #^testdom3[] |
| ^$t.a=$t.a<BR> | #^testdom2[] |
| #^testdom1[] | |
| ^$env:REQUEST_URI=$env:REQUEST_URI<BR> | #^testdom0[] |
| ^$env:PATH_INFO=$env:PATH_INFO<BR> | OK |
| @testdom4[] | |
| ^$env:REMOTE_ADDR=$env:REMOTE_ADDR<BR> | $dom[^dom::set{<?xml version="1.0" encoding="windows-1251"?> |
| ^$env:REQUEST_URI=$env:REQUEST_URI<BR> | |
| <doc>testing ïðîâåðêà ÏÐÎÂÅÐÊÀ. ^$form:a='$form:a'</doc> | |
| ^rem{ | }] |
| $response:body[] | $response:body[^dom.file[$.encoding[windows-1251]]] |
| $response:location[http://parser3/123] | |
| } | @testdom3[] |
| $dom[^dom::load[test.xml]] | |
| $dom[^dom.xslt[test.xsl;$.param1(48)]] | |
| ^$root_test=$root_test !<BR> | $dom[^dom.xslt[test.xsl;$.param1(48)]] |
| ^$site_test=$site_test !<BR> | |
| ^${cookie:âîò}=${cookie:âîò}?<BR> | @testdom2[] |
| ^$request:query=$request:query<BR> | $dom[^dom::load[test.xml]] |
| ^$request:uri=$request:uri<BR> | #^dom.save[$.encoding[windows-1251];write.xml] |
| #^dom.save[;write.xml] | |
| <form method=post> | ^dom.save[$.encoding[windows-1251] $.method[xml];write.xml] |
| (^$form:name=$form:name)<BR> | ^dom.save[$.encoding[windows-1251] $.method[html];write.html] |
| <input name=name value="^default[$form:name;íå çíàþ]"> | ^dom.save[$.encoding[windows-1251] $.method[text];write.txt] |
| <input type=submit> | |
| </form> | @testdom1[] |
| $dom[^dom::load[test.xml]] | |
| @default[test;def] | $dom[^dom.xslt[test.xsl;$.param1(48)]] |
| ^if(^test.length[]){$test}{$def} | $response:body[^dom.file[$.encoding[windows-1251]]] |
| @exception[origin;source;comment;type;code] | @testdom0[] |
| <body bgcolor=black> | $dom[^dom::load[test.xml]] |
| <font color=white> | ^dom.save[$.encoding[windows-1251];write.xml] |
| ERROR: | ^dom.string[$.encoding[windows-1251]] |
| ^if(def $source){$origin '$source'} | $ôàéë[^dom.file[$.encoding[windows-1251]]] |
| ${comment}. | ^ôàéë.save[binary;writefile.xml] |
| ^if(def $type){type=$type} | $response:body[$ôàéë] |
| ^if(def $code){code=$code} | OK |