|
|
| version 1.173, 2001/05/08 08:15:03 | version 1.178, 2001/05/10 12:42:41 |
|---|---|
| Line 1 | Line 1 |
| @main[] | @main[] |
| $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{ | |
| ^empty{query result is empty}{ | |
| <table border=1> | |
| <tr><td>id</td><td>name</td><td>age</td></tr> | |
| ^menu{<tr><td>$id</td><td>$name</td><td>$age</td></tr>} | |
| </table> | |
| }} | |
| } | |
| } | |
| <HR> | |
| $abc{} | |
| $tn[^table:set[nameless]{a1 b1 | |
| a2 b2 | |
| }] | |
| $x[^tn.locate[0;a2]] | |
| ^$tn.1=$tn.1 | |
| <hr> | |
| $t0[^table:set{key a b | |
| 1 a1 | |
| 2 a2 b2 | |
| }] | |
| ^if(^t0.locate[key;2] && "a" ne "b"){y;n} | |
| <hr> | |
| $currentFolder[/a/b] | |
| $path[^currentFolder.lsplit[/]] | |
| ^path.flip[] | |
| $path{ | |
| ^menu{$0}{,} | |
| } | |
| <hr> | |
| $t1[^table:set{key value | |
| 1 v1 | |
| 2 v2}] | |
| $h1[^t1.hash[key]] | |
| ^h1.default[$value[nothing]] | |
| ^$h1.2.value=$h1.2.value<br> | |
| ^$h1.2x.value=$h1.2x.value<br> | |
| <hr> | |
| $t2[^table:set{key a b | $t2[^table:set{key a b |
| 1 a1 | 1 a1 |
| 2 a2 b2 | 2 a2 b2 |
| }] | }] |
| t2 ^if(^t2.empty[]){empty}{not empty}<br> | |
| ^t2.offset(1) | ^t2.offset(1) |
| $t2.b | $t2.b |
| $r[^t2.record[]] | $r[^t2.record[]] |
| Line 11 $th[^t2.hash[b]] | Line 62 $th[^t2.hash[b]] |
| ^$th.b2.a=$th.b2.a<br> | ^$th.b2.a=$th.b2.a<br> |
| <hr> | <hr> |
| $th[^t2.hash[key;a]] | $th[^t2.hash[key;a]] |
| ^$th.2=$th.2<br> | ^$th.2.a=$th.2.a<br> |
| <hr> | <hr> |
| #^OP:eval(1<2) | #^OP:eval(1<2) |