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