Annotation of parser3/src/www/htdocs/index.html, revision 1.72
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.70 paf 19: #^t.menu{$n<BR>}
1.64 paf 20: <HR>
1.66 paf 21: @func[n]
22: $n
1.48 paf 23: @main[]
1.72 ! paf 24: ^$request:browser.type=$request:browser.type<BR>
! 25: ^$request:browser.version=$request:browser.version<BR>
! 26:
1.71 paf 27: $tf[^file:load[test.zip;abc.zip]]
28: ^$tf.name=$tf.name<BR>
1.69 paf 29: ^$tf.size=$tf.size<BR>
1.71 paf 30: ^$tf.mime-type=$tf.mime-type<BR>
1.70 paf 31: ^$tf.text:<BR>
32: $tf.text<HR>
1.69 paf 33: <HR>
1.68 paf 34: ^file:find[test.cfg]<BR>
35: ^file:find[tes.cfg]{not found}<BR>
36: <HR>
37:
1.62 paf 38: $t[^table:set{n
1.63 paf 39: 3
1.64 paf 40: 01.3
41: 1.2
1.62 paf 42: 2
43: }]
1.70 paf 44: #$t{^locate[n;2z]^found{$n}{not found}}<BR>
45: #$t{^locate[n;3]^found{found:$n}{not found}}<BR>
1.64 paf 46: ^$t:<BR>
47: ^dump[$t]
1.70 paf 48: #^t.sort($n)
1.65 paf 49: ^^t.sort(^$n):<BR>
50: ^dump[$t]
1.70 paf 51: #^t.sort{^:func($n)}
1.65 paf 52: ^^t.sort{^^:func(^$n)}:<BR>
1.64 paf 53: ^dump[$t]
1.70 paf 54: #^t.sort{$n}
1.65 paf 55: ^^t.sort{^$n}:<BR>
1.64 paf 56: ^dump[$t]
1.70 paf 57: #^t.sort{$n}[desc]
1.65 paf 58: ^^t.sort{^$n}[desc]:<BR>
1.64 paf 59: ^dump[$t]
1.62 paf 60: <HR>
61:
1.61 paf 62: ^if(-f index.html){y}{n}<BR>
1.53 paf 63: ^taint[html-typo;не знаю
64: я ничего
65:
66: <<слово длинное>>
1.54 paf 67:
68: (c) by Я
1.53 paf 69: ]<HR>
1.38 paf 70: $t[^table:load[/test.cfg]]
1.44 paf 71: ^process[@b[]
72: f
73: ]
1.46 paf 74: ^b[]<BR>
1.44 paf 75:
1.38 paf 76: ^$t.a=$t.a<BR>
1.59 paf 77: ^t.offset[2]
1.61 paf 78: #$r[^t.record[]]
79: #^$r.a=$r.a<BR>
1.38 paf 80:
1.42 paf 81: ^$request:uri=$request:uri<BR>
1.41 paf 82: ^$env:PATH_INFO=$env:PATH_INFO<BR>
1.39 paf 83: ^$env:REMOTE_ADDR=$env:REMOTE_ADDR<BR>
1.36 paf 84:
85: ^rem{
86: $response:body[]
87: $response:location[http://parser3/123]
88: }
89:
90:
1.43 paf 91: <HR>
92: ^^auto_test[]:<BR>
93: <ol>
94: ^auto_test[]
95: </ol>
96: <HR>
97:
1.35 paf 98: ^${cookie:вот}=${cookie:вот}?<BR>
99: ^$request:query=$request:query<BR>
100: ^$request:uri=$request:uri<BR>
1.33 paf 101:
1.32 paf 102: <form method=post>
1.50 paf 103: <table border=1 width=250><tr><td>$form:name</td></tr></table>
1.57 paf 104: <textarea name=name rows=5 cols=40>^untaint[html]{^default[$form:name;не знаю]}</textarea><BR>
1.32 paf 105: <input type=submit>
106: </form>
1.30 paf 107:
1.32 paf 108: @default[test;def]
1.51 paf 109: $result[^if(^test.length[]){$test}{$def}]
1.31 paf 110:
111: @exception[origin;source;comment;type;code]
1.35 paf 112: <body bgcolor=black>
113: <font color=white>
1.31 paf 114: ERROR:
1.67 paf 115: ^if(def $source){$origin '$source'}
1.31 paf 116: ${comment}.
117: ^if(def $type){type=$type}
118: ^if(def $code){code=$code}
1.42 paf 119:
1.43 paf 120: @auto_test[]
121: ^BASE.auto_test[]
1.67 paf 122: <li>${request:uri}!
E-mail: