R::Writer::Encoder - Default Encoder

R-Writer documentation

Contained in the R-Writer distribution.

Index

NAME
SYNOPSIS
METHODS
- new
- encode

Code Index:

package R::Writer::Encoder
- new
- encode
__END__
EOF

NAME

R::Writer::Encoder - Default Encoder

SYNOPSIS

  use R::Writer::Encoder;
  # Internal use only

METHODS

new

encode

R-Writer documentation

Contained in the R-Writer distribution.

# $Id: /mirror/coderepos/lang/perl/R-Writer/trunk/lib/R/Writer/Encoder.pm 43085 2008-03-01T12:28:42.888222Z daisuke  $
#
# Copyright (c) 2008 Daisuke Maki <daisuke@endeworks.jp>
# All rights reserved.

package R::Writer::Encoder;
use strict;
use warnings;

use JSON::XS (); # XXX - Remove this in the future?
our $CODER = JSON::XS->new->allow_nonref;

sub new    { bless \my $c, shift }
sub encode { $CODER->encode($_[1]) }

1;

__END__