e JSON::XS ();
use constant DEFAULT_CHARSET => 'utf-8';
my $json = undef;
sub _default_formatter {
my $value = shift;
$json ||= JSON::XS->new->allow_nonref->allow_blessed;
return $json-
value ), returns JavaScript representation for the value.
JSON::XS-based by default.
* charset - Charset, utf-8 by default.
=cut
sub new {
my ( $cl