### ----------------------------------------------------
### -- JSON::Stream
### -- Licenses: Artistic-2.0
### -- Authors: Fernando Correa de Oliveira
### -- File: test.t
### ----------------------------------------------------
use lib "lib";
use JSON::Stream;
react whenever json-stream Supply.from-list(['{', '"bla"   ', '   :', '    "bl', 'e bli blo"    , "bli":{"bla":[1, 2, {"bla": "array"}]}', '}']), [['$'], ['$', **, 'bla'], ['$', 'bli', 'bla', 1]] -> (:$key, :$value) {
   say "[$key => $value.perl()]"
}
#react whenever json-stream Supply.from-list(['{', '"bla"   ', '   :', '    "bl', 'e bli blo"    ', '}']), [['$',], <$ bla>] { .say }


