Annotation of parser3/src/www/htdocs/index.html, revision 1.251

1.212     parser      1: @main[]
1.249     parser      2: ^connect[pgsql://paf:paf123@six/paf]{
1.250     parser      3: #      ^void:sql{create table lotest (test oid)}
1.251   ! parser      4:        ^void:sql{insert into lotest (test) values (/*:test*/'пр\'иве')}
1.250     parser      5:        $проверка[^table::sql{select test from lotest}]
                      6:        ^проверка.menu{
                      7: #              ^проверка.line[]:<pre>^untaint[as-is]{$проверка.test}</pre>
1.251   ! parser      8: #              ^проверка.line[]:<pre>^untaint[html]{$проверка.test}</pre>
1.250     parser      9: #              ^проверка.line[]:<pre>$проверка.test</pre>
1.251   ! parser     10:                ^проверка.line[]:$проверка.test
1.250     parser     11:        }[<br>]
                     12:        <hr>
                     13: 
                     14: ^rem{
                     15: #      ^void:sql{create table texttest (body text)}
                     16:        ^void:sql{insert into texttest (body) values ('приветприветприветприветприветприветприветприветприветприветприветприветпривет
                     17: приветприветприветприветприветприветприветприветприветприветприветприветпривет
                     18: приветприветприветприветприветприветприветприветприветприветприветприветпривет
                     19: приветприветприветприветприветприветприветприветприветприветприветприветпривет
                     20: приветприветприветприветприветприветприветприветприветприветприветприветпривет
                     21: приветприветприветприветприветприветприветприветприветприветприветприветпривет
                     22: приветприветприветприветприветприветприветприветприветприветприветприветпривет
                     23: приветприветприветприветприветприветприветприветприветприветприветприветпривет
                     24: приветприветприветприветприветприветприветприветприветприветприветприветпривет
                     25: приветприветприветприветприветприветприветприветприветприветприветприветпривет
                     26: приветприветприветприветприветприветприветприветприветприветприветприветпривет
                     27: приветприветприветприветприветприветприветприветприветприветприветприветпривет
                     28: приветприветприветприветприветприветприветприветприветприветприветприветпривет
                     29: приветприветприветприветприветприветприветприветприветприветприветприветпривет
                     30: приветприветприветприветприветприветприветприветприветприветприветприветпривет
                     31: приветприветприветприветприветприветприветприветприветприветприветприветпривет
                     32: приветприветприветприветприветприветприветприветприветприветприветприветпривет
                     33: приветприветприветприветприветприветприветприветприветприветприветприветпривет
                     34: приветприветприветприветприветприветприветприветприветприветприветприветпривет
                     35: приветприветприветприветприветприветприветприветприветприветприветприветпривет
                     36: приветприветприветприветприветприветприветприветприветприветприветприветпривет
                     37: приветприветприветприветприветприветприветприветприветприветприветприветпривет
                     38: приветприветприветприветприветприветприветприветприветприветприветприветпривет
                     39: ')}
                     40:        $проверка[^table::sql{select * from texttest}]
                     41:        ^проверка.menu{
                     42:                ^проверка.line[]:$проверка.body
                     43:        }[<br>]
                     44:        <hr>
                     45: }
1.249     parser     46: #    ^void::sql{insert into хрен (a) values (1)}
1.250     parser     47:        2*2=$id(^int:sql{select 2*2})
1.249     parser     48:        $id<br>
                     49: 
                     50:        $пресса[^table::sql{select * from aaa}]
                     51: #      $a[^пресса.columns[]]^a.menu{$a.column}
                     52:        ^пресса.menu{
                     53:                $пресса.val
                     54:        }[<br>]
                     55: }
                     56: <hr>
1.250     parser     57: $cookie:reg0[$.value[8reg0]$.expires[session]]
                     58: $cookie:reg1[$.value[8reg1]$.expires[session]]
1.248     parser     59: $cookie:reg0
                     60: $cookie:reg1
                     61: 
                     62: <hr>
1.243     parser     63: ^connect[odbc://dsn=voz7^;uid=voz^;pwd=pwd]{
1.245     parser     64: #    ^void::sql{insert into хрен (a) values (1)}
1.246     parser     65:        $id(^int:sql{select 5})
                     66:        $id
                     67: 
1.245     parser     68:        $пресса[^table::sql{select * from press where header='$form:h'}]
1.243     parser     69:        ^пресса.menu{
                     70:                $пресса.id, $пресса.date_row, $пресса.header, $пресса.short_text^rem{, $пресса.full_text}, $пресса.mode
                     71:        }[<br>]
                     72: }
                     73: <hr>
1.239     parser     74: #$response:status[404]
                     75: #$response:location[/inh.html]
                     76: #<hr>
1.245     parser     77: $таблица[^table::set{a b
1.238     parser     78: 1      2
                     79: 11     22
                     80: }]
                     81: ^$таблица.fields.a=$таблица.fields.a<br>
                     82: ^$таблица.a=$таблица.a<br>
                     83: <hr>
1.247     parser     84: $n[z]
1.237     parser     85: =^n.match[sdf][]{123}=
                     86: <hr>
                     87: 
                     88: =$3=
                     89: <hr>
                     90: 
1.240     parser     91: $строка[123]
                     92: ^строка.match[(.);g]{($match.1)}
1.212     parser     93: <hr>
1.236     parser     94: $a{
                     95:        $b[1]
1.212     parser     96: }
1.236     parser     97: ^$b=$b<br>
                     98: ^$a!$a<br>
                     99: ^$b=$b<br>
1.212     parser    100: <hr>

E-mail: