JSONパーサ

perlでお試しで再帰使ったら結構簡単に実装できた！と思ったらまだ色々穴がありそう。
数値をキーにできたりしたので、DIGITかSTRINGとかぐらいの区別が出来ないとダメね。
構文解析器は苦手だなぁ。