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