--- parser3/src/www/htdocs/Attic/index.html 2001/03/27 15:37:56 1.63 +++ parser3/src/www/htdocs/Attic/index.html 2001/09/18 16:05:43 1.317 @@ -1,89 +1,62 @@ -@auto[] -$html-typo[^table:set{user html comment -<< «^; длинные user вперёд ->> »^; -\n\n

!эти есть в таблице по умолчанию -\n
!но т.к. заменяем, надо повторить. -< <^; !можно этим воспользоваться, -> >^; !и что-то сделать ДО обычных замен -" "^; !например из << и >> -& &^; !сделать ёлочки-кавычки. -_  ^; -^#AB «^; windows коды ёлочек -^#BB »^; windows коды ёлочек -(c) ©^; -^#A9 ©^; windows (c) -}] - @main[] -$t[^table:set{n -3 -1 -2 +^xslt[] +OK + +@xslt[] +$dom[^dom::set{ + + + + PAF + + + ПИФ + + }] -^t.sort{$n} -$t.n -

- -^if(-f index.html){y}{n}
-^taint[html-typo;не знаю -я ничего - -<<слово длинное>> - -(c) by Я -]
-$t[^table:load[/test.cfg]] -^process[@b[] -f -] -^b[]
- -^$t.a=$t.a
-^t.offset[2] -#$r[^t.record[]] -#^$r.a=$r.a
- -^$request:uri=$request:uri
-^$env:PATH_INFO=$env:PATH_INFO
-^$env:REMOTE_ADDR=$env:REMOTE_ADDR
- -^rem{ -$response:body[] -$response:location[http://parser3/123] + +^show-dnode[$dom]
+$people[^dom.xpath[*/man[@id=1]]] +#^show1[] +#^show-dnodes[$people]
+^show-dnodes2[$people]
+#^people.0.owner.hren[] + +@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 + } +
} +@show-dnodes[array][i] +^for[i](0;^array._count[]-1){ + ^show-dnode[$array.$i] +} + +@show-dnode[dnode;level][l] +^for[l](0;$level-1){ ^; ^; ^; ^;} +^if($dnode.type eq element){ + <^;$dnode.name +$pairs[$dnode.attributes] +^if(def $pairs){ + $names[^pairs._keys[]] + ^names.menu{$names.key=$pairs.[$names.key].value } +} +>^; +}{[$dnode.type]} + +^if(def $dnode.value){'$dnode.value'}
+^if(def ${dnode.first-child}){^show-dnode[$dnode.first-child]($level+1)} +^if(def ${dnode.next-sibling}){^show-dnode[$dnode.next-sibling]($level)} -
-^^auto_test[]:
-
    -^auto_test[] -
-
- -^${cookie:вот}=${cookie:вот}?
-^$request:query=$request:query
-^$request:uri=$request:uri
- -
-
$form:name
-
- -
- -@default[test;def] -$result[^if(^test.length[]){$test}{$def}] - -@exception[origin;source;comment;type;code] - - -ERROR: -^if(def $source){$origin '$source'} -${comment}. -^if(def $type){type=$type} -^if(def $code){code=$code} - -@auto_test[] -^BASE.auto_test[] -
  • ${request:uri}! +^if($dnode.type eq element){ +^for[l](0;$level-1){ ^; ^; ^; ^;}<^;/$dnode.name>^;
    +} +@show-dnodes2[people] +^people.string[]