Преобразование таблицы в хеш...

Aleksey 06.02.2004 13:17

Третий день бьюсь никак не добьюсь нужного результата...
Задача такая, есть таблица вида:
cat | id | name
6 1 aa
6 2 bb
6 3 cc
3 4 dd
3 5 ee
ее надо преобразовать в хеш
$.6[
$.1[aa]
$.2[bb]
$.3[cc]
]
$.3[
$.4[dd]
$.5[ee]
]
использую следущий код:
$m2[^table::sql{select cat, id, name from tabname order by cat}]
$mid[]
$m2t[
^m2.menu{
^if($mid ne $m2.con_id){
^if($mid ne ''){]}
$mid[$m2.cat]
$.[$mid][
}
$.[$m2.id][$m2.name]
^if(^m2.line[]==^m2.count[]){]}
}
]
получаю ошибку:
... index.html(400:1): parse error, expecting `']''
если закомментировать знак $ и просмотреть результат как строку, получается вполне пристойный результат.
Если кто занимался такой проблемой, посоветуйте что-нибудь плз..

---