|
|
| version 1.72, 2001/03/28 14:41:34 | version 1.177, 2001/05/08 12:58:05 |
|---|---|
| Line 1 | Line 1 |
| @auto[] | @main[] |
| !!$html-typo[^table:set{user html comment | $currentFolder[/a/b] |
| << «^; длинные user вперёд | $path[^currentFolder.lsplit[/]] |
| >> »^; | ^path.flip[] |
| \n\n <p> !эти есть в таблице по умолчанию | $path{ |
| \n <br> !но т.к. заменяем, надо повторить. | ^menu{$0}{,} |
| < <^; !можно этим воспользоваться, | } |
| > >^; !и что-то сделать ДО обычных замен | <hr> |
| " "^; !например из << и >> | $t1[^table:set{key value |
| & &^; !сделать ёлочки-кавычки. | 1 v1 |
| _  ^; | 2 v2}] |
| ^#AB «^; windows коды ёлочек | $h1[^t1.hash[key]] |
| ^#BB »^; windows коды ёлочек | ^h1.default[$value[nothing]] |
| (c) ©^; | ^$h1.2.value=$h1.2.value<br> |
| ^#A9 ©^; windows (c) | ^$h1.2x.value=$h1.2x.value<br> |
| <hr> | |
| $t2[^table:set{key a b | |
| 1 a1 | |
| 2 a2 b2 | |
| }] | }] |
| t2 ^if(^t2.empty[]){empty}{not empty}<br> | |
| @dump[t] | ^t2.offset(1) |
| #^t.menu{$n<BR>} | $t2.b |
| $r[^t2.record[]] | |
| <hr> | |
| $th[^t2.hash[b]] | |
| ^$th.b2.a=$th.b2.a<br> | |
| <hr> | |
| $th[^t2.hash[key;a]] | |
| ^$th.2.a=$th.2.a<br> | |
| <hr> | |
| #^OP:eval(1<2) | |
| $filelist[^table:dir[.]] | |
| <hr> | |
| $path[/news/tululu/] | |
| #^path.flip[] | |
| <hr> | |
| $branches[^table:set{name val | |
| index.cgihtml 123 | |
| }] | |
| $splitURI[^request:uri.lsplit[/]] | |
| name ^if(^branches.locate[name;$splitURI.1]){found;not found}: | |
| $branches.name | |
| <HR> | |
| $splitURI[^request:uri.lsplit[/]] | |
| $splitURI.0!$splitURI.1 | |
| <HR> | <HR> |
| @func[n] | |
| $n | |
| @main[] | |
| ^$request:browser.type=$request:browser.type<BR> | |
| ^$request:browser.version=$request:browser.version<BR> | |
| $tf[^file:load[test.zip;abc.zip]] | $t2[^table:set{dir title |
| ^$tf.name=$tf.name<BR> | /here Here |
| ^$tf.size=$tf.size<BR> | |
| ^$tf.mime-type=$tf.mime-type<BR> | |
| ^$tf.text:<BR> | |
| $tf.text<HR> | |
| <HR> | |
| ^file:find[test.cfg]<BR> | |
| ^file:find[tes.cfg]{not found}<BR> | |
| <HR> | |
| $t[^table:set{n | |
| 3 | |
| 01.3 | |
| 1.2 | |
| 2 | |
| }] | }] |
| #$t{^locate[n;2z]^found{$n}{not found}}<BR> | $t2{^menu{${dir}-$title}[,]} |
| #$t{^locate[n;3]^found{found:$n}{not found}}<BR> | <HR> |
| ^$t:<BR> | $dir[news] |
| ^dump[$t] | $list[^table:dir[$dir]] |
| #^t.sort($n) | ^list.menu{ |
| ^^t.sort(^$n):<BR> | $subdir[$dir/$list.name] |
| ^dump[$t] | $sublist[^table:dir[$subdir]] |
| #^t.sort{^:func($n)} | ${list.name}/ $sublist{^menu{$name}[,]}<br> |
| ^^t.sort{^^:func(^$n)}:<BR> | |
| ^dump[$t] | |
| #^t.sort{$n} | |
| ^^t.sort{^$n}:<BR> | |
| ^dump[$t] | |
| #^t.sort{$n}[desc] | |
| ^^t.sort{^$n}[desc]:<BR> | |
| ^dump[$t] | |
| <HR> | |
| ^if(-f index.html){y}{n}<BR> | |
| ^taint[html-typo;не знаю | |
| я ничего | |
| <<слово длинное>> | |
| (c) by Я | |
| ]<HR> | |
| $t[^table:load[/test.cfg]] | |
| ^process[@b[] | |
| f | |
| ] | |
| ^b[]<BR> | |
| ^$t.a=$t.a<BR> | |
| ^t.offset[2] | |
| #$r[^t.record[]] | |
| #^$r.a=$r.a<BR> | |
| ^$request:uri=$request:uri<BR> | |
| ^$env:PATH_INFO=$env:PATH_INFO<BR> | |
| ^$env:REMOTE_ADDR=$env:REMOTE_ADDR<BR> | |
| ^rem{ | |
| $response:body[] | |
| $response:location[http://parser3/123] | |
| } | } |
| <HR> | <HR> |
| ^^auto_test[]:<BR> | ^t[x] |
| <ol> | |
| ^auto_test[] | |
| </ol> | |
| <HR> | <HR> |
| ^if(in "/otherdeeper"){y;n} | |
| ^${cookie:вот}=${cookie:вот}?<BR> | <HR> |
| ^$request:query=$request:query<BR> | ^$form:проверка_имя=$form:проверка_имя<BR> |
| ^$request:uri=$request:uri<BR> | |
| <form method=post> | <form method=post> |
| <table border=1 width=250><tr><td>$form:name</td></tr></table> | <input name=проверка_имя value=проверка_значение> |
| <textarea name=name rows=5 cols=40>^untaint[html]{^default[$form:name;не знаю]}</textarea><BR> | |
| <input type=submit> | <input type=submit> |
| </form> | </form> |
| <HR> | |
| ^^table:dir[/]:<BR> | |
| $d[^table:dir[/]] | |
| $d{^menu{$name  ^; ^; ^; ^;^if(-f $name){-f} ^if(-d $name){-d};<BR>}} | |
| <HR> | |
| @default[test;def] | $files[^table:set{name}] |
| $result[^if(^test.length[]){$test}{$def}] | $d{^menu{ |
| ^if(-d "$name"){ | |
| ^:files.append{$name} | |
| } | |
| }} | |
| @exception[origin;source;comment;type;code] | $files{^menu{$name}[,]} |
| <HR> | |
| @exception[origin;source;comment;type;code][i;j] | |
| <body bgcolor=black> | <body bgcolor=black> |
| <font color=white> | <font color=white> |
| ERROR: | ERROR: |
| Line 119 ${comment}. | Line 97 ${comment}. |
| @auto_test[] | @auto_test[] |
| ^BASE.auto_test[] | ^BASE.auto_test[] |
| <li>${request:uri}! | |
| <li>${request:uri}! | |
| @t[a] | |
| -${a}- | |
| @end | |