--- parser3/www/htdocs/Attic/_bug.html 2004/03/25 11:51:19 1.35 +++ parser3/www/htdocs/Attic/_bug.html 2006/04/09 13:38:48 1.117 @@ -1,66 +1,42 @@ -@auto[] -$request:charset[windows-1251] -$response:charset[windows-1251] - -@main[] -$table[^table::create{pet -cat milk}] -$hash[^table.hash[pet]] -^display[$hash] - -@main[] -^connect[mysql://root@localhost/paf]{ - -$hash[^hash::sql{select 'cat' as pet -#, 'milk' as food -}] -^display_hash[$hash] - - -} - -@main[] -^connect[mysql://root@localhost/paf]{ - $participants[^hash::sql{select 'feodor' as participant }] -} - -#:даст хеш такой структуры: -$participantsZ[ - $.alex(1) - $.boris(1) +$hash[ + $.1(1) + $.2(2) ] - -#:из которого можно эффективно извлекать информацию, например, так: -$person[feodor] -$person ^if($participants.$person){участвует}{не участвует} в мероприятии +^hash.foreach[k;v]{ + k=$k,v=$v^break[];! } - -@display_hash[hash] -#$hash.a.a -^hash.foreach[k;v]{hash $k=( -^if($v is hash){^display_hash[$v]}{ -^if($v is bool){bool ^if($v){true;false}}{string $v} -} +$table[^table::create{a +1 +2 +3}] +^table.menu{ + <$table.a^if($table.a==2){^break[]!}> }[,] +------------- -)^#0A}] - - -@main[] -$name[ Вася ] -"$name" -"^name.trim[]" +^while(1<2){ + $i($i+1) + ^if(1<3){ + { + <$i^if($i==3){^break[]}> + } + } +} -$path[/section/subsection/] -^path.trim[end;/] +^for[i](1;3){ + $i before + ^if($i==2){^continue[]} + after +}[,] -@main[] -$xdoc[^xdoc::create{ - - string - -}] -$xdoc.search-namespaces.s[urn:special] -^xdoc.selectString[string(//s:code)] +$response:paf[test] +$response:paf[] +--- +$hashfile[^hashfile::open[hf]] +$hashfile.1(1) +$hashfile.2(2) +^hashfile.foreach[k;v]{ + k=$k,v=$v^break[];! +}