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