Annotation of parser3/src/www/htdocs/index.html, revision 1.84
1.50 paf 1: @auto[]
1.67 paf 2: !!$html-typo[^table:set{user html comment
1.55 paf 3: << «^; длинные user вперёд
4: >> »^;
5: \n\n <p> !эти есть в таблице по умолчанию
1.56 paf 6: \n <br> !но т.к. заменяем, надо повторить.
7: < <^; !можно этим воспользоваться,
8: > >^; !и что-то сделать ДО обычных замен
9: " "^; !например из << и >>
10: & &^; !сделать ёлочки-кавычки.
1.52 paf 11: _  ^;
1.53 paf 12: ^#AB «^; windows коды ёлочек
13: ^#BB »^; windows коды ёлочек
1.54 paf 14: (c) ©^;
1.58 paf 15: ^#A9 ©^; windows (c)
1.51 paf 16: }]
1.50 paf 17:
1.64 paf 18: @dump[t]
1.81 paf 19: ^t.menu{$n<BR>}
1.64 paf 20: <HR>
1.66 paf 21: @func[n]
22: $n
1.73 paf 23: @twop[a;b]
24: ($a,$b)
1.84 ! paf 25:
1.48 paf 26: @main[]
1.84 ! paf 27: ^^random:generate(10)=^random:generate(-1)<BR>
! 28:
! 29:
! 30: <HR>
1.81 paf 31: $t[^table:load[/test.cfg]]
32: $t{
1.82 paf 33: ^menu{$a!$b!$c<BR>}
34: <HR>
35: ^append[x y z]
36: ^menu{$a!$b!$c<BR>}
1.81 paf 37: <HR>
38: ^flip[]
1.82 paf 39: ^menu{$0!$1!$2!$3<BR>}
1.81 paf 40: <HR>
41: }
42:
1.78 paf 43: $a[vasya,fedya,kolya]
1.80 paf 44: ^^"$a".lsplit[,]=$as[^a.lsplit[,]]$as.0|$as.1|$as.2|$as.3<BR>
45: ^^"$a".rsplit[,]=$as[^a.rsplit[,]]$as.0|$as.1|$as.2|$as.3<BR>
1.76 paf 46: ^^a.pos(sy]="^a.pos[sy]"<BR>
47: ^^a.pos[zsy]="^a.pos[zsy]"<BR>
1.74 paf 48: ^^a.left(3)="^a.left(3)"<BR>
49: ^^a.right(3)="^a.right(3)"<BR>
50: ^^a.mid(1;3)="^a.mid(1;3)"<BR>
51: <HR>
1.83 paf 52: ^^twop[a;]=^twop[a;]<BR>
1.72 paf 53: ^$request:browser.type=$request:browser.type<BR>
54: ^$request:browser.version=$request:browser.version<BR>
55:
1.71 paf 56: $tf[^file:load[test.zip;abc.zip]]
57: ^$tf.name=$tf.name<BR>
1.69 paf 58: ^$tf.size=$tf.size<BR>
1.71 paf 59: ^$tf.mime-type=$tf.mime-type<BR>
1.70 paf 60: ^$tf.text:<BR>
61: $tf.text<HR>
1.69 paf 62: <HR>
1.68 paf 63: ^file:find[test.cfg]<BR>
64: ^file:find[tes.cfg]{not found}<BR>
65: <HR>
66:
1.62 paf 67: $t[^table:set{n
1.63 paf 68: 3
1.64 paf 69: 01.3
70: 1.2
1.62 paf 71: 2
72: }]
1.81 paf 73: $t{^locate[n;2z]^found{$n}{not found}}<BR>
74: $t{^locate[n;3]^found{found:$n}{not found}}<BR>
1.64 paf 75: ^$t:<BR>
76: ^dump[$t]
1.81 paf 77: ^t.sort($n)
1.65 paf 78: ^^t.sort(^$n):<BR>
79: ^dump[$t]
1.81 paf 80: ^t.sort{^:func($n)}
1.65 paf 81: ^^t.sort{^^:func(^$n)}:<BR>
1.64 paf 82: ^dump[$t]
1.81 paf 83: ^t.sort{$n}
1.65 paf 84: ^^t.sort{^$n}:<BR>
1.64 paf 85: ^dump[$t]
1.81 paf 86: ^t.sort{$n}[desc]
1.65 paf 87: ^^t.sort{^$n}[desc]:<BR>
1.64 paf 88: ^dump[$t]
1.62 paf 89: <HR>
90:
1.61 paf 91: ^if(-f index.html){y}{n}<BR>
1.53 paf 92: ^taint[html-typo;не знаю
93: я ничего
94:
95: <<слово длинное>>
1.54 paf 96:
97: (c) by Я
1.53 paf 98: ]<HR>
1.38 paf 99: $t[^table:load[/test.cfg]]
1.44 paf 100: ^process[@b[]
101: f
102: ]
1.46 paf 103: ^b[]<BR>
1.44 paf 104:
1.38 paf 105: ^$t.a=$t.a<BR>
1.59 paf 106: ^t.offset[2]
1.61 paf 107: #$r[^t.record[]]
108: #^$r.a=$r.a<BR>
1.38 paf 109:
1.42 paf 110: ^$request:uri=$request:uri<BR>
1.41 paf 111: ^$env:PATH_INFO=$env:PATH_INFO<BR>
1.39 paf 112: ^$env:REMOTE_ADDR=$env:REMOTE_ADDR<BR>
1.36 paf 113:
114: ^rem{
115: $response:body[]
116: $response:location[http://parser3/123]
117: }
118:
119:
1.43 paf 120: <HR>
121: ^^auto_test[]:<BR>
122: <ol>
123: ^auto_test[]
124: </ol>
125: <HR>
126:
1.35 paf 127: ^${cookie:вот}=${cookie:вот}?<BR>
128: ^$request:query=$request:query<BR>
129: ^$request:uri=$request:uri<BR>
1.33 paf 130:
1.32 paf 131: <form method=post>
1.50 paf 132: <table border=1 width=250><tr><td>$form:name</td></tr></table>
1.57 paf 133: <textarea name=name rows=5 cols=40>^untaint[html]{^default[$form:name;не знаю]}</textarea><BR>
1.32 paf 134: <input type=submit>
135: </form>
1.83 paf 136:
137: <HR>
138: $свойства_когда_пьян[
139: $цвет_глаз[красный]
140: ]
141: $вася[
142: $свойства[$свойства_когда_пьян]
143: ]
144:
145: $кусок_имени_поля[ства]
146: ^$кусок_имени_поля=$кусок_имени_поля<BR>
147: ^$вася.свой^$кусок_имени_поля.цвет_глаз=$вася.свой$кусок_имени_поля.цвет_глаз
148: <HR>
149: <form method=post enctype=multipart/form-data>
150: <input name=photo type=file>
151: <input type=submit>
152: </form>
153: <hr>
154: ^if($form:photo){
155: <pre>
156: ^$form:photo.name='$form:photo.name'
157: ^$form:photo.size='$form:photo.size'
158: ^$form:photo.text='$form:photo.text'
159: ^form:photo.save[paf.txt]
160: </pre>
161: }
162:
163: #todo proper! untaint $response:refresh[$value[2] $content[url=http://design.ru]]
164:
1.30 paf 165:
1.32 paf 166: @default[test;def]
1.51 paf 167: $result[^if(^test.length[]){$test}{$def}]
1.31 paf 168:
169: @exception[origin;source;comment;type;code]
1.35 paf 170: <body bgcolor=black>
171: <font color=white>
1.31 paf 172: ERROR:
1.67 paf 173: ^if(def $source){$origin '$source'}
1.31 paf 174: ${comment}.
175: ^if(def $type){type=$type}
176: ^if(def $code){code=$code}
1.42 paf 177:
1.43 paf 178: @auto_test[]
179: ^BASE.auto_test[]
1.67 paf 180: <li>${request:uri}!
E-mail: