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