|
|
| version 1.45, 2001/03/24 09:57:52 | version 1.301, 2001/09/10 09:51:00 |
|---|---|
| Line 1 | Line 1 |
| @USE | |
| /news.p | |
| @main[] | @main[] |
| ^testdom0[] | |
| $t[^table:load[/test.cfg]] | @testdom0[] |
| ^process[@b[] | $dom[^dom::load[test.xml]] |
| f | ^dom.save[windows-1251;write.xml] |
| ] | ^dom.string[windows-1251] |
| ^b[] | |
| ^$t.a=$t.a<BR> | |
| ^$request:uri=$request:uri<BR> | |
| ^$env:PATH_INFO=$env:PATH_INFO<BR> | |
| ^$env:REMOTE_ADDR=$env:REMOTE_ADDR<BR> | |
| ^rem{ | |
| $response:body[] | |
| $response:location[http://parser3/123] | |
| } | |
| <HR> | |
| ^^auto_test[]:<BR> | |
| <ol> | |
| ^auto_test[] | |
| </ol> | |
| <HR> | |
| ^${cookie:вот}=${cookie:вот}?<BR> | |
| ^$request:query=$request:query<BR> | |
| ^$request:uri=$request:uri<BR> | |
| <form method=post> | |
| (^$form:name=$form:name)<BR> | |
| <input name=name value="^default[$form:name;не знаю]"> | |
| <input type=submit> | |
| </form> | |
| @default[test;def] | |
| ^if(^test.length[]){$test}{$def} | |
| @exception[origin;source;comment;type;code] | |
| <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<BR> | |