数据库中解析JSON数组

DECLARE
  l_json    json := json('{
  "name": "网站",
  "num": 3,
  "sites": [ "Google.com", "Taobao.com", "Waibo.wang" ]
}');
  temparray json_list; 
BEGIN  
  temparray := json_list(l_json.get('sites')); 
  FOR i IN 1 .. temparray.count LOOP
    dbms_output.put_line(temparray.get(i).get_string);
  END LOOP;
END;