помогите разобраться с хешем

-=OHRANA=- 19.01.2004 16:44

пример из документации

$man[ 
   $.name[Вася] 
   $.age[22] 
   $.sex[m] 
] 
^man.foreach[key;value]{ 
        $key=$value 
}[<br>] 

работает, а мой

$grp_t_hash[^hash::sql{select gid,rname from grp ORDER BY rname ASC}]
^grp_t_hash.foreach[key;value]{
        $key=$value 
}[<br>] 

не работает
что я делаю не так.

---