.010;
use strict;
use warnings;
use utf8;
package JSON::T;
use overload '""' => \&_to_string;
BEGIN
{
$JSON::T::AUTHORITY = 'cpan:TOBYINK';
$JSON::T::VERSION = '0.104';
}
our ($JSLIB, @Impleme
{
local $/ = undef;
$JSLIB = <DATA>;
}
}
BEGIN
{
push @Implementations, qw/
JSON::T::SpiderMonkey
JSON::T::JE
/;
}
{
no warnings 'redefine';
sub DOES
{
my ($class, $role) = @_;
re
return 'JsonT:#'.$self->{'name'};
}
sub _json_backend
{
my $self = shift;
$self->{'json_backend'} ||= eval {
require Cpanel::JSON::MaybeXS;
'Cpanel::JSON::MaybeXS';
};
$self->{'json_backend
8;
use JavaScript::SpiderMonkey ();
package JSON::T::SpiderMonkey;
our $AUTHORITY = 'cpan:TOBYINK';
our $VERSION = '0.104';
our @ISA = qw( JSON::T );
sub init
{
my $self = shift;
my (@ar
y_by_path($k, "$v");
}
}
1;
__END__
=pod
=encoding utf-8
=head1 NAME
JSON::T::SpiderMonkey - transform JSON using JsonT and SpiderMonkey (libjs)
=head1 DESCRIPTION
This module uses L<JavaScri
eters>
=back
=head1 BUGS
Please report any bugs to L<http://rt.cpan.org/>.
=head1 SEE ALSO
L<JSON::T>.
=head1 AUTHOR
Toby Inkster E<lt>tobyink@cpan.orgE<gt>.
=head1 COPYRIGHT AND LICENCE
Copy
rict;
use warnings;
use utf8;
use JE ();
package JSON::T::JE;
our $AUTHORITY = 'cpan:TOBYINK';
our $VERSION = '0.104';
our @ISA = qw( JSON::T );
sub init
{
my $self = shift;
my (@args) =
($self->{'engine'}, $v));
}
}
1;
__END__
=pod
=encoding utf-8
=head1 NAME
JSON::T::JE - transform JSON using JsonT and JE
=head1 DESCRIPTION
This module uses L<JE> to provide JavaScript suppo
eters>
=back
=head1 BUGS
Please report any bugs to L<http://rt.cpan.org/>.
=head1 SEE ALSO
L<JSON::T>.
=head1 AUTHOR
Toby Inkster E<lt>tobyink@cpan.orgE<gt>.
=head1 COPYRIGHT AND LICENCE
Copy