Annotation of parser3/src/www/htdocs/index.html, revision 1.385
1.364 parser 1: @main[]
1.385 ! parser 2: ^set[]
! 3: #^hash[]<hr>
1.384 parser 4: #$t[^methresult[]] ->$t
1.382 parser 5: #^terror[]
1.378 parser 6: #^ssave[]
1.377 parser 7: #^calendar[]
1.376 parser 8: #^thash[]
1.373 parser 9: #^tdef[]
1.375 parser 10: #^ford[]
1.371 parser 11: #^tif[]
1.383 parser 12: #^image[]
1.369 parser 13: #^mail2[]
1.367 parser 14: #^cookie[]
1.365 parser 15: #^response[]
1.364 parser 16: #^regexp2[]
17: #^ttablerem[]
18: #^pcre[]
19: #^regexp[]<hr>
20: #^mail[]
21: #^exec[]
22: #^fori[]
23: #^tconnect[]
1.383 parser 24: #^xslt[]
1.366 parser 25: #^xml[]
1.364 parser 26: #^header[]
27: OK
1.385 ! parser 28:
! 29: @set[]
! 30: ^setdata[]
! 31: ^a.add[$b]
! 32: add:$a.3<br>
! 33:
! 34: ^setdata[]
! 35: ^a.sub[$b]
! 36: sub2:$a.2<br>
! 37: sub1:$a.1<br>
! 38:
! 39: ^setdata[]
! 40: $c[^a.union[$b]]
! 41: union3:$c.3<br>
! 42: union2:$c.2<br>
! 43:
! 44: ^setdata[]
! 45: $c[^a.intersection[$b]]
! 46: intersection3:$c.3<br>
! 47: intersection2:$c.2<br>
! 48:
! 49: ^setdata[]
! 50: intersects:^if(^a.intersects[$b]){y;n}<br>
! 51: intersects2:^if(^a.intersects[ ]){y;n}<br>
! 52:
! 53:
! 54: <hr>
! 55:
! 56: @setdata[]
! 57: $a[$.1[a1] $.2[a2]]
! 58: $b[ $.2[b2] $.3[b3]]
! 59:
1.383 parser 60:
1.384 parser 61: @hash[]
62: $h[^hash::create[$._default[123]]]
63: $h.paf[not kretin]
64: $h.paf<br>
65: =$h.that=<br>
66:
67: @methresult[]
68: $result[^table::set{1}]
1.377 parser 69:
1.381 parser 70: @terror[]
71: ^error[method z must be called with z]
72:
1.380 parser 73: @syntax1[]
74: #^a[^b]
75:
76: @syntax2[]
1.381 parser 77: #^a[
1.379 parser 78:
1.377 parser 79: @ssave[]
80: $abc[abc]
81: ^abc.save[abc]
1.376 parser 82:
83: @calendar[]
84: 2001;11:<br>
85: $week_days[^date:calendar[rus](2001;11)]
86: <pre>
87: ^week_days.menu{^for[wday](0;7){^if($week_days.$wday){$week_days.$wday; ^; ^;} }<br>}
88: </pre>
1.372 parser 89:
1.375 parser 90: @thash[]
91: $table[^table::set{id name age
92: 1 paf 278
93: 2 пиф 234
94: }]
95: $hash[^table.hash[id;^table::set[nameless]{id
96: name}]]
97: $hash.2.id $hash.2.name $hash.2.age
98:
1.372 parser 99: @tdef[]
100: $s[0]
101: if 0=^if($s){}{n}<br>
102: if def 0=^if(def $s){y}{}<br>
103: <hr>
1.371 parser 104:
105: @ford[]
1.374 parser 106: ^for[i](0;5){$i}{($i)}
1.368 parser 107:
1.370 parser 108: @tif[]
109: ^if[def]{y;n}
110:
1.368 parser 111: @image[]
112: $pict[^image::create(400;200)]
1.379 parser 113: ^pict.arc($pict.width/2;$pict.height/2;$pict.width-1;$pict.height-1;0;360;0x000000)
114: ^pict.arc($pict.width/2;$pict.height/2;$pict.width-10;$pict.height-10;0+10;360-10;0xff0000)
115: #^pict.arc($pict.width/2;$pict.height/2;$pict.width;$pict.height;0;360;0xff0000)
116: ^pict.circle($pict.width/2;$pict.height/2;$pict.height/2-10;0x0000ff)
117: ^pict.arc($pict.width/2;$pict.height/2;$pict.height-26;$pict.height-26;0+10;360-10;0xff0000)
1.368 parser 118: $response:body[^pict.gif[]]
119:
120:
1.366 parser 121:
1.369 parser 122: @mail2[]
1.367 parser 123: ^mail:send[
1.369 parser 124: $.content-type[$.value[text/plain] $.charset[windows-1251]]
125: $.from[Александр Петросян <paf@design.ru>]
1.367 parser 126: $.to[Александр Петросян <paf@design.ru>]
1.369 parser 127: $.subject[проверка]
128: $.body[проверка]
1.367 parser 129: ]
130:
1.366 parser 131: @cookie[]
1.367 parser 132: $env:HTTP_COOKIE<br>
133:
134: #$cookie:переменная[test тест ТЕСТ2]
135: =$cookie:переменная=<br>
136: #$cookie:переменная2[test тест ТЕСТ3]
137: =$cookie:переменная2=<br>
1.365 parser 138:
139: @response[]
140: #^if($form:reload){
141: $response:refresh[$.value[0] $.url[./t.html?uri=$env:SERVER_NAME]]
142: #}
1.364 parser 143:
144: @xslt[]
145: ^xdata[]
1.375 parser 146: ^show-xdoc2[^xdoc.transform[global.xsl;$.param1[123/]]]
1.364 parser 147:
148: @regexp2[]
149: $s[ select]
150: $s[^s.match[^^\s*][]{!}]
151: $s
152:
153: @header[]
154: $response:refresh[
155: $.value[0]
156: $.url[http://design.ru?a=^taint[123]]
157: ]
158:
159: @ttablerem[]
160: $table[^table::load[a.cfg]]
161: ^table.menu{$table.a}
162:
163: @tconnect[]
164: ^connect[mysql://test:test@paf/test?charset=cp1251_koi8&compress=1&timeout=1&named_pipe=1]{
165: $tables[^table::sql{show tables}]
166: #$cols[^tables.columns[]]
167: #$cols.column
168: ^tables.menu{
169: $tables.[Tables_in_test]<br>
170: }
171: }
172:
173: @pcre[]
174: $s[1 2]
175: ^s.match[\s;ig]{!}
176: #^s.match[\d;ig]{!}
177:
178:
179: @regexp[]
180: $s[abcАБВ]
181: ^if(^s.match[б][i]){y}{n}
182:
183: @mail[]
184: #$ORIGINS(1)
185: ^mail:send[
186: $.from[paf@design.ru]
187: $.to[paf@design.ru]
188: $.body[1
189:
190: 2
191:
192:
193: 3]
194: ]
195:
196: @exec[]
1.370 parser 197: $a[^file::exec[fc.exe;;a;b]]
1.364 parser 198: $a.status|$a.stderr<hr>
199:
200: @fori[][i]
201: ^for[i](1;3){... =$i= ...}
202:
203: @xdata[]
204: #$response:content-type[$.value[text/html] $.charset[windows-1251]]
205: $xdoc[^xdoc::load[input.xml]]
206:
207: @xml[]
208: ^xdata[]
209:
210: ^show-xdoc2[$xdoc]<hr>
211: #^show-xnode1[$xdoc]<hr>
212: $people[^xdoc.select[*/man]]
213: #^show1[]
214: ^show-xnodes1[$people]<hr>
215: #^people.0.owner.hren[]
216:
217: ^show-xnode1[^xdoc.select-single[*/man[2]/name];0;1]<hr>
218:
219: by id:
220: ^show-xnode1[^xdoc.getElementById[1];0;1]
221: <hr>
222:
223: @show1[array]
224: ^for[i](0;^array._count[]-1){
225: $x[$array.$i]
226: $x.firstChild.nodeValue:
227: $pattributes[$x.parentNode.attributes]
228: ^if(^pattributes._count[]){
229: $pattributes.id.name=$pattributes.id.nodeValue
230: }
231: <br>
232: }
233:
234: @show-xnodes1[array][i]
235: ^for[i](0;^array._count[]-1){
236: ^show-xnode1[$array.$i;0;1]
237: }
238:
239: @show-xnode1[x;level;single][l]
240: ^if(def $x){
241: ^for[l](0;$level-1){ ^; ^; ^; ^;}
242: ^if($x.nodeType == $xnode:ELEMENT_NODE){
243: <^;$x.nodeName
244: $pairs[$x.attributes]
245: ^if(def $pairs){
246: $names[^pairs._keys[]]
247: ^names.menu{ $names.key="$pairs.[$names.key].nodeValue"}
248: }
249: >^;
250: }{
251: [$x.nodeType]
252: }
253:
254: ^if(def $x.nodeValue){$x.nodeValue}<br>
255: ^show-xnode1[$x.firstChild]($level+1)
256: ^if(!$single){
257: ^show-xnode1[$x.nextSibling]($level)
258: }
259:
260: ^if($x.nodeType == $xnode:ELEMENT_NODE){
261: ^for[l](0;$level-1){ ^; ^; ^; ^;}<^;/$x.nodeName>^;<br>
262: }
263: }
264:
265: @show-xdoc2[xdoc]
266: ^xdoc.save[save.xml;
267: # $.encoding[windows-1251]
268: $.method[xml]
269: ]
270: $file[^xdoc.file[
271: # $.encoding[windows-1251]
272: $.method[html]
273: ]]
274: ^file.save[text;save_file.html]
275: <pre>^taint[^xdoc.string[]]</pre>
276: # $.encoding[windows-1251]
277: # $.method[xml]
278: #]]
E-mail:
![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to index.html CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [parser3project] / parser3 / src / www / htdocs