$ perl -MJSON -E'say JSON->new->allow_nonref->encode({lool=>"WEEEE",YAY=>"WEEEE"})'
{"lool":"WEEEE","YAY":"WEEEE"}