Annotation of parser3/www/htdocs/_bug.html, revision 1.35
1.35 ! paf 1: @auto[]
! 2: $request:charset[windows-1251]
! 3: $response:charset[windows-1251]
! 4:
! 5:
! 6: @main[]
! 7: $table[^table::create{pet
! 8: cat milk}]
! 9: $hash[^table.hash[pet]]
! 10: ^display[$hash]
! 11:
! 12: @main[]
! 13: ^connect[mysql://root@localhost/paf]{
! 14:
! 15: $hash[^hash::sql{select 'cat' as pet
! 16: #, 'milk' as food
! 17: }]
! 18: ^display_hash[$hash]
! 19:
! 20:
! 21: }
! 22:
! 23: @main[]
! 24: ^connect[mysql://root@localhost/paf]{
! 25: $participants[^hash::sql{select 'feodor' as participant }]
! 26: }
! 27:
! 28: #:даст хеш такой структуры:
! 29: $participantsZ[
! 30: $.alex(1)
! 31: $.boris(1)
! 32: ]
! 33:
! 34: #:из которого можно эффективно извлекать информацию, например, так:
! 35: $person[feodor]
! 36: $person ^if($participants.$person){участвует}{не участвует} в мероприятии
! 37: }
! 38:
! 39:
! 40: @display_hash[hash]
! 41: #$hash.a.a
! 42: ^hash.foreach[k;v]{hash $k=(
! 43: ^if($v is hash){^display_hash[$v]}{
! 44: ^if($v is bool){bool ^if($v){true;false}}{string $v}
! 45: }
! 46: }[,]
! 47:
! 48: )^#0A}]
! 49:
! 50:
! 51: @main[]
! 52: $name[ Вася ]
! 53: "$name"
! 54: "^name.trim[]"
! 55:
! 56: $path[/section/subsection/]
! 57: ^path.trim[end;/]
! 58:
! 59: @main[]
! 60: $xdoc[^xdoc::create{<?xml version="1.0"?>
! 61: <document xmlns:s="urn:special">
! 62: <s:code>string</s:code>
! 63: </document>
! 64: }]
! 65: $xdoc.search-namespaces.s[urn:special]
! 66: ^xdoc.selectString[string(//s:code)]
E-mail: