Annotation of parser3/src/www/htdocs/index.html, revision 1.365
1.364 parser 1: @main[]
1.365 ! parser 2: #^response[]
1.364 parser 3: #^regexp2[]
4: #^ttablerem[]
5: #^pcre[]
6: #^regexp[]<hr>
7: #^mail[]
8: #^exec[]
9: #^fori[]
10: #^tconnect[]
1.365 ! parser 11: #^xslt[]
! 12: ^xml[]
1.364 parser 13: #^header[]
14: OK
1.365 ! parser 15:
! 16: @response[]
! 17: #^if($form:reload){
! 18: $response:refresh[$.value[0] $.url[./t.html?uri=$env:SERVER_NAME]]
! 19: #}
1.364 parser 20:
21: @xslt[]
22: ^xdata[]
23: ^show-xdoc2[^xdoc.transform[global.xsl]]
24:
25: @regexp2[]
26: $s[ select]
27: $s[^s.match[^^\s*][]{!}]
28: $s
29:
30: @header[]
31: $response:refresh[
32: $.value[0]
33: $.url[http://design.ru?a=^taint[123]]
34: ]
35:
36: @ttablerem[]
37: $table[^table::load[a.cfg]]
38: ^table.menu{$table.a}
39:
40: @tconnect[]
41: ^connect[mysql://test:test@paf/test?charset=cp1251_koi8&compress=1&timeout=1&named_pipe=1]{
42: $tables[^table::sql{show tables}]
43: #$cols[^tables.columns[]]
44: #$cols.column
45: ^tables.menu{
46: $tables.[Tables_in_test]<br>
47: }
48: }
49:
50: @pcre[]
51: $s[1 2]
52: ^s.match[\s;ig]{!}
53: #^s.match[\d;ig]{!}
54:
55:
56: @regexp[]
57: $s[abcÀÁÂ]
58: ^if(^s.match[á][i]){y}{n}
59:
60: @mail[]
61: #$ORIGINS(1)
62: ^mail:send[
63: $.from[paf@design.ru]
64: $.to[paf@design.ru]
65: $.body[1
66:
67: 2
68:
69:
70: 3]
71: ]
72:
73: @exec[]
74: $a[^file::exec[fc.exe;a;b]]
75: $a.status|$a.stderr<hr>
76:
77: @fori[][i]
78: ^for[i](1;3){... =$i= ...}
79:
80: @xdata[]
81: #$response:content-type[$.value[text/html] $.charset[windows-1251]]
82: $xdoc[^xdoc::load[input.xml]]
83:
84: @xml[]
85: ^xdata[]
86:
87: ^show-xdoc2[$xdoc]<hr>
88: #^show-xnode1[$xdoc]<hr>
89: $people[^xdoc.select[*/man]]
90: #^show1[]
91: ^show-xnodes1[$people]<hr>
92: #^people.0.owner.hren[]
93:
94: ^show-xnode1[^xdoc.select-single[*/man[2]/name];0;1]<hr>
95:
96: by id:
97: ^show-xnode1[^xdoc.getElementById[1];0;1]
98: <hr>
99:
100: @show1[array]
101: ^for[i](0;^array._count[]-1){
102: $x[$array.$i]
103: $x.firstChild.nodeValue:
104: $pattributes[$x.parentNode.attributes]
105: ^if(^pattributes._count[]){
106: $pattributes.id.name=$pattributes.id.nodeValue
107: }
108: <br>
109: }
110:
111: @show-xnodes1[array][i]
112: ^for[i](0;^array._count[]-1){
113: ^show-xnode1[$array.$i;0;1]
114: }
115:
116: @show-xnode1[x;level;single][l]
117: ^if(def $x){
118: ^for[l](0;$level-1){ ^; ^; ^; ^;}
119: ^if($x.nodeType == $xnode:ELEMENT_NODE){
120: <^;$x.nodeName
121: $pairs[$x.attributes]
122: ^if(def $pairs){
123: $names[^pairs._keys[]]
124: ^names.menu{ $names.key="$pairs.[$names.key].nodeValue"}
125: }
126: >^;
127: }{
128: [$x.nodeType]
129: }
130:
131: ^if(def $x.nodeValue){$x.nodeValue}<br>
132: ^show-xnode1[$x.firstChild]($level+1)
133: ^if(!$single){
134: ^show-xnode1[$x.nextSibling]($level)
135: }
136:
137: ^if($x.nodeType == $xnode:ELEMENT_NODE){
138: ^for[l](0;$level-1){ ^; ^; ^; ^;}<^;/$x.nodeName>^;<br>
139: }
140: }
141:
142: @show-xdoc2[xdoc]
143: ^xdoc.save[save.xml;
144: # $.encoding[windows-1251]
145: $.method[xml]
146: ]
147: $file[^xdoc.file[
148: # $.encoding[windows-1251]
149: $.method[html]
150: ]]
151: ^file.save[text;save_file.html]
152: <pre>^taint[^xdoc.string[]]</pre>
153: # $.encoding[windows-1251]
154: # $.method[xml]
155: #]]
E-mail: