Annotation of parser3/src/www/htdocs/index.html, revision 1.370
1.364 parser 1: @main[]
1.370 ! parser 2: ^tif[]
! 3: #^image[]
1.369 parser 4: #^mail2[]
1.367 parser 5: #^cookie[]
1.365 parser 6: #^response[]
1.364 parser 7: #^regexp2[]
8: #^ttablerem[]
9: #^pcre[]
10: #^regexp[]<hr>
11: #^mail[]
12: #^exec[]
13: #^fori[]
14: #^tconnect[]
1.365 parser 15: #^xslt[]
1.366 parser 16: #^xml[]
1.364 parser 17: #^header[]
18: OK
1.368 parser 19:
1.370 ! parser 20: @tif[]
! 21: ^if[def]{y;n}
! 22:
1.368 parser 23: @image[]
24: $pict[^image::create(400;200)]
25: ^pict.arc($pict.width/2;$pict.height/2;$pict.width;$pict.height;0;360;0x000000)
26: ^pict.circle($pict.width/2;$pict.height/2;$pict.height/2-5;0x000000)
27: $response:body[^pict.gif[]]
28:
29:
1.366 parser 30:
1.369 parser 31: @mail2[]
1.367 parser 32: ^mail:send[
1.369 parser 33: $.content-type[$.value[text/plain] $.charset[windows-1251]]
34: $.from[Александр Петросян <paf@design.ru>]
1.367 parser 35: $.to[Александр Петросян <paf@design.ru>]
1.369 parser 36: $.subject[проверка]
37: $.body[проверка]
1.367 parser 38: ]
39:
1.366 parser 40: @cookie[]
1.367 parser 41: $env:HTTP_COOKIE<br>
42:
43: #$cookie:переменная[test тест ТЕСТ2]
44: =$cookie:переменная=<br>
45: #$cookie:переменная2[test тест ТЕСТ3]
46: =$cookie:переменная2=<br>
1.365 parser 47:
48: @response[]
49: #^if($form:reload){
50: $response:refresh[$.value[0] $.url[./t.html?uri=$env:SERVER_NAME]]
51: #}
1.364 parser 52:
53: @xslt[]
54: ^xdata[]
55: ^show-xdoc2[^xdoc.transform[global.xsl]]
56:
57: @regexp2[]
58: $s[ select]
59: $s[^s.match[^^\s*][]{!}]
60: $s
61:
62: @header[]
63: $response:refresh[
64: $.value[0]
65: $.url[http://design.ru?a=^taint[123]]
66: ]
67:
68: @ttablerem[]
69: $table[^table::load[a.cfg]]
70: ^table.menu{$table.a}
71:
72: @tconnect[]
73: ^connect[mysql://test:test@paf/test?charset=cp1251_koi8&compress=1&timeout=1&named_pipe=1]{
74: $tables[^table::sql{show tables}]
75: #$cols[^tables.columns[]]
76: #$cols.column
77: ^tables.menu{
78: $tables.[Tables_in_test]<br>
79: }
80: }
81:
82: @pcre[]
83: $s[1 2]
84: ^s.match[\s;ig]{!}
85: #^s.match[\d;ig]{!}
86:
87:
88: @regexp[]
89: $s[abcАБВ]
90: ^if(^s.match[б][i]){y}{n}
91:
92: @mail[]
93: #$ORIGINS(1)
94: ^mail:send[
95: $.from[paf@design.ru]
96: $.to[paf@design.ru]
97: $.body[1
98:
99: 2
100:
101:
102: 3]
103: ]
104:
105: @exec[]
1.370 ! parser 106: $a[^file::exec[fc.exe;;a;b]]
1.364 parser 107: $a.status|$a.stderr<hr>
108:
109: @fori[][i]
110: ^for[i](1;3){... =$i= ...}
111:
112: @xdata[]
113: #$response:content-type[$.value[text/html] $.charset[windows-1251]]
114: $xdoc[^xdoc::load[input.xml]]
115:
116: @xml[]
117: ^xdata[]
118:
119: ^show-xdoc2[$xdoc]<hr>
120: #^show-xnode1[$xdoc]<hr>
121: $people[^xdoc.select[*/man]]
122: #^show1[]
123: ^show-xnodes1[$people]<hr>
124: #^people.0.owner.hren[]
125:
126: ^show-xnode1[^xdoc.select-single[*/man[2]/name];0;1]<hr>
127:
128: by id:
129: ^show-xnode1[^xdoc.getElementById[1];0;1]
130: <hr>
131:
132: @show1[array]
133: ^for[i](0;^array._count[]-1){
134: $x[$array.$i]
135: $x.firstChild.nodeValue:
136: $pattributes[$x.parentNode.attributes]
137: ^if(^pattributes._count[]){
138: $pattributes.id.name=$pattributes.id.nodeValue
139: }
140: <br>
141: }
142:
143: @show-xnodes1[array][i]
144: ^for[i](0;^array._count[]-1){
145: ^show-xnode1[$array.$i;0;1]
146: }
147:
148: @show-xnode1[x;level;single][l]
149: ^if(def $x){
150: ^for[l](0;$level-1){ ^; ^; ^; ^;}
151: ^if($x.nodeType == $xnode:ELEMENT_NODE){
152: <^;$x.nodeName
153: $pairs[$x.attributes]
154: ^if(def $pairs){
155: $names[^pairs._keys[]]
156: ^names.menu{ $names.key="$pairs.[$names.key].nodeValue"}
157: }
158: >^;
159: }{
160: [$x.nodeType]
161: }
162:
163: ^if(def $x.nodeValue){$x.nodeValue}<br>
164: ^show-xnode1[$x.firstChild]($level+1)
165: ^if(!$single){
166: ^show-xnode1[$x.nextSibling]($level)
167: }
168:
169: ^if($x.nodeType == $xnode:ELEMENT_NODE){
170: ^for[l](0;$level-1){ ^; ^; ^; ^;}<^;/$x.nodeName>^;<br>
171: }
172: }
173:
174: @show-xdoc2[xdoc]
175: ^xdoc.save[save.xml;
176: # $.encoding[windows-1251]
177: $.method[xml]
178: ]
179: $file[^xdoc.file[
180: # $.encoding[windows-1251]
181: $.method[html]
182: ]]
183: ^file.save[text;save_file.html]
184: <pre>^taint[^xdoc.string[]]</pre>
185: # $.encoding[windows-1251]
186: # $.method[xml]
187: #]]
E-mail: