Annotation of parser3/src/www/htdocs/index.html, revision 1.182
1.48 paf 1: @main[]
1.182 ! parser 2: $a[12]
! 3: ^a.int[]
! 4: <hr>
! 5:
! 6:
1.178 paf 7: $t[^table:set{key value
8: 1 v1
9: 2 v2}]
10: $h[^t.hash[key]]
11:
12:
1.180 paf 13: #^rem{
1.178 paf 14: ^connect[$SQL.connect-string]{
15: $shit[^taint[our's]]
16: # $paf[^table:sql{insert into paf (name, age) values ('$shit', ^random:generate(10000))}]
17: $paf[^table:sql{select * from paf order by id desc}(5)]
18: $paf{
1.180 paf 19: ^if(^empty[]){query result is empty}{
1.178 paf 20: <table border=1>
21: <tr><td>id</td><td>name</td><td>age</td></tr>
22: ^menu{<tr><td>$id</td><td>$name</td><td>$age</td></tr>}
23: </table>
24: }}
25: }
1.180 paf 26: #}
1.178 paf 27:
28: <HR>
29: $abc{}
30: $tn[^table:set[nameless]{a1 b1
31: a2 b2
32: }]
33: $x[^tn.locate[0;a2]]
34: ^$tn.1=$tn.1
35: <hr>
36: $t0[^table:set{key a b
37: 1 a1
38: 2 a2 b2
39: }]
40: ^if(^t0.locate[key;2] && "a" ne "b"){y;n}
41: <hr>
1.177 paf 42: $currentFolder[/a/b]
43: $path[^currentFolder.lsplit[/]]
44: ^path.flip[]
45: $path{
46: ^menu{$0}{,}
47: }
48: <hr>
1.175 paf 49: $t1[^table:set{key value
50: 1 v1
51: 2 v2}]
52: $h1[^t1.hash[key]]
53: ^h1.default[$value[nothing]]
1.176 paf 54: ^$h1.2.value=$h1.2.value<br>
55: ^$h1.2x.value=$h1.2x.value<br>
1.175 paf 56: <hr>
1.172 paf 57: $t2[^table:set{key a b
1.173 paf 58: 1 a1
1.172 paf 59: 2 a2 b2
60: }]
1.175 paf 61: t2 ^if(^t2.empty[]){empty}{not empty}<br>
1.173 paf 62: ^t2.offset(1)
63: $t2.b
64: $r[^t2.record[]]
65: <hr>
66: $th[^t2.hash[b]]
67: ^$th.b2.a=$th.b2.a<br>
68: <hr>
69: $th[^t2.hash[key;a]]
1.174 paf 70: ^$th.2.a=$th.2.a<br>
1.172 paf 71: <hr>
1.171 paf 72: #^OP:eval(1<2)
1.169 paf 73:
74: $filelist[^table:dir[.]]
1.168 paf 75: <hr>
76: $path[/news/tululu/]
1.169 paf 77: #^path.flip[]
1.168 paf 78: <hr>
1.167 paf 79: $branches[^table:set{name val
80: index.cgihtml 123
81: }]
82: $splitURI[^request:uri.lsplit[/]]
1.171 paf 83: name ^if(^branches.locate[name;$splitURI.1]){found;not found}:
84: $branches.name
1.167 paf 85: <HR>
1.166 paf 86: $splitURI[^request:uri.lsplit[/]]
1.164 paf 87: $splitURI.0!$splitURI.1
88: <HR>
89:
1.163 paf 90: $t2[^table:set{dir title
91: /here Here
92: }]
93: $t2{^menu{${dir}-$title}[,]}
94: <HR>
95: $dir[news]
96: $list[^table:dir[$dir]]
97: ^list.menu{
98: $subdir[$dir/$list.name]
99: $sublist[^table:dir[$subdir]]
100: ${list.name}/ $sublist{^menu{$name}[,]}<br>
101: }
102: <HR>
1.161 paf 103: ^if(in "/otherdeeper"){y;n}
104: <HR>
1.160 paf 105: ^$form:проверка_имя=$form:проверка_имя<BR>
1.181 paf 106: <form method=post action=index.html>
1.160 paf 107: <input name=проверка_имя value=проверка_значение>
108: <input type=submit>
109: </form>
110: <HR>
111:
1.116 paf 112: ^^table:dir[/]:<BR>
113: $d[^table:dir[/]]
1.158 paf 114: $d{^menu{$name  ^; ^; ^; ^;^if(-f $name){-f} ^if(-d $name){-d};<BR>}}
1.115 paf 115: <HR>
116:
1.158 paf 117: $files[^table:set{name}]
1.159 paf 118: $d{^menu{
119: ^if(-d "$name"){
120: ^:files.append{$name}
1.158 paf 121: }
1.159 paf 122: }}
123:
1.158 paf 124: $files{^menu{$name}[,]}
1.94 paf 125: <HR>
1.31 paf 126:
1.159 paf 127: @exception[origin;source;comment;type;code][i;j]
1.35 paf 128: <body bgcolor=black>
129: <font color=white>
1.31 paf 130: ERROR:
1.67 paf 131: ^if(def $source){$origin '$source'}
1.31 paf 132: ${comment}.
133: ^if(def $type){type=$type}
134: ^if(def $code){code=$code}
1.42 paf 135:
1.43 paf 136: @auto_test[]
137: ^BASE.auto_test[]
1.168 paf 138: <li>${request:uri}!
1.179 paf 139: @end
1.168 paf 140:
141:
1.179 paf 142: @a[]
E-mail: