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