--- parser3/src/www/htdocs/Attic/index.html 2001/03/24 19:12:25 1.50 +++ parser3/src/www/htdocs/Attic/index.html 2001/05/11 14:29:00 1.181 @@ -1,51 +1,125 @@ -@auto[] -$html-typo[^table:set{user html -_  ^; -{ «^; -} »^; -}] - @main[] -
-$t[^table:load[/test.cfg]] -^process[@b[] -f -] -^b[]
- -^$t.a=$t.a
- -^$request:uri=$request:uri
-^$env:PATH_INFO=$env:PATH_INFO
-^$env:REMOTE_ADDR=$env:REMOTE_ADDR
- -^rem{ -$response:body[] -$response:location[http://parser3/123] +$t[^table:set{key value +1 v1 +2 v2}] +$h[^t.hash[key]] + + +#^rem{ +^connect[$SQL.connect-string]{ + $shit[^taint[our's]] +# $paf[^table:sql{insert into paf (name, age) values ('$shit', ^random:generate(10000))}] + $paf[^table:sql{select * from paf order by id desc}(5)] + $paf{ + ^if(^empty[]){query result is empty}{ + + + ^menu{} +
idnameage
$id$name$age
+ }} } - +#}
-^^auto_test[]:
-
    -^auto_test[] -
+$abc{} +$tn[^table:set[nameless]{a1 b1 +a2 b2 +}] +$x[^tn.locate[0;a2]] +^$tn.1=$tn.1 +
+$t0[^table:set{key a b +1 a1 +2 a2 b2 +}] +^if(^t0.locate[key;2] && "a" ne "b"){y;n} +
+$currentFolder[/a/b] +$path[^currentFolder.lsplit[/]] +^path.flip[] +$path{ +^menu{$0}{,} +} +
+$t1[^table:set{key value +1 v1 +2 v2}] +$h1[^t1.hash[key]] +^h1.default[$value[nothing]] +^$h1.2.value=$h1.2.value
+^$h1.2x.value=$h1.2x.value
+
+$t2[^table:set{key a b +1 a1 +2 a2 b2 +}] +t2 ^if(^t2.empty[]){empty}{not empty}
+^t2.offset(1) +$t2.b +$r[^t2.record[]] +
+$th[^t2.hash[b]] +^$th.b2.a=$th.b2.a
+
+$th[^t2.hash[key;a]] +^$th.2.a=$th.2.a
+
+#^OP:eval(1<2) + +$filelist[^table:dir[.]] +
+$path[/news/tululu/] +#^path.flip[] +
+$branches[^table:set{name val +index.cgihtml 123 +}] +$splitURI[^request:uri.lsplit[/]] +name ^if(^branches.locate[name;$splitURI.1]){found;not found}: +$branches.name +
+$splitURI[^request:uri.lsplit[/]] +$splitURI.0!$splitURI.1
-^${cookie:вот}=${cookie:вот}?
-^$request:query=$request:query
-^$request:uri=$request:uri
- -
-
$form:name
-
+$t2[^table:set{dir title +/here Here +}] +$t2{^menu{${dir}-$title}[,]} +
+$dir[news] +$list[^table:dir[$dir]] +^list.menu{ + $subdir[$dir/$list.name] + $sublist[^table:dir[$subdir]] + ${list.name}/ $sublist{^menu{$name}[,]}
+} +
+^if(in "/otherdeeper"){y;n} +
+^$form:проверка_имя=$form:проверка_имя
+ +
+
-@default[test;def] -^if(^test.length[]){$test}{$def} +^^table:dir[/]:
+$d[^table:dir[/]] +$d{^menu{$name  ^; ^; ^; ^;^if(-f $name){-f} ^if(-d $name){-d};
}} +
+ +$files[^table:set{name}] +$d{^menu{ + ^if(-d "$name"){ + ^:files.append{$name} + } +}} -@exception[origin;source;comment;type;code] +$files{^menu{$name}[,]} +
+ +@exception[origin;source;comment;type;code][i;j] ERROR: @@ -56,5 +130,8 @@ ${comment}. @auto_test[] ^BASE.auto_test[] -
  • $request:uri +
  • ${request:uri}! +@end + +@a[]