|
|
| version 1.54, 2001/03/25 09:40:56 | version 1.314, 2001/09/18 13:31:56 |
|---|---|
| Line 1 | Line 1 |
| @auto[] | |
| $html-typo[^table:set{user html comment | |
| \n\n <p> эти есть в таблице по умолчанию | |
| \n <br> но т.к. заменяем, надо повторить | |
| _  ^; | |
| <^;<^; «^; | |
| >^;>^; »^; | |
| ^#AB «^; windows коды ёлочек | |
| ^#BB »^; windows коды ёлочек | |
| (c) ©^; | |
| }] | |
| @main[] | @main[] |
| ^taint[html-typo;не знаю | ^xslt[] |
| я ничего | OK |
| <<слово длинное>> | @xslt[] |
| $dom[^dom::set{<?xml version="1.0" encoding="windows-1251"?> | |
| (c) by Я | <people> |
| ]<HR> | <man id="1"> |
| $t[^table:load[/test.cfg]] | <name>PAF</name> |
| ^process[@b[] | </man> |
| f | <man id="2"> |
| ] | <name>ПИФ</name> |
| ^b[]<BR> | </man> |
| </people> | |
| ^$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] | |
| } | |
| ^show-dnode[$dom]<hr> | |
| $people[^dom.xpath[*/man/*]] | |
| #^show1[] | |
| ^show-dnodes[$people]<hr> | |
| @show1[] | |
| ^for[i](0;^people._count[]-1){ | |
| $node[$people.$i] | |
| $node.first-child.value: | |
| $pattributes[$node.parent.attributes] | |
| ^if(^pattributes._count[]){ | |
| $pattributes.id.name=$pattributes.id.value | |
| } | |
| <br> | |
| } | |
| <HR> | @show-dnodes[array2] |
| ^^auto_test[]:<BR> | ^for[i](0;^array2._count[]-1){ |
| <ol> | ^show-dnode[$array2.$i] |
| ^auto_test[] | } |
| </ol> | |
| <HR> | |
| ^${cookie:вот}=${cookie:вот}?<BR> | |
| ^$request:query=$request:query<BR> | |
| ^$request:uri=$request:uri<BR> | |
| <form method=post> | |
| <table border=1 width=250><tr><td>$form:name</td></tr></table> | |
| <textarea name=name rows=5 cols=40>^untaint[html]{^default[$form:name;не знаі]}</textarea><BR> | |
| <input type=submit> | |
| </form> | |
| @default[test;def] | |
| $result[^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 | |
| @show-dnode[dnode] | |
| [$dnode.type] $dnode.name ^if(def $dnode.value){'$dnode.value'}<br> | |
| ^if(def ${dnode.first-child}){^show-dnode[$dnode.first-child]} | |
| ^if(def ${dnode.next-sibling}){^show-dnode[$dnode.next-sibling]} |