File Coverage

blib/lib/Project/Easy/Config/Format/json.pm

Criterion	Covered	Total	%
statement	18	18	100.0
branch			n/a
condition			n/a
subroutine	5	5	100.0
pod	0	3	0.0
total	23	26	88.4

package Project::Easy::Config::Format::json;

use Class::Easy;

use JSON;

sub new {
	my $class = shift;

	my $json = JSON->new;
	$json->utf8 (1);
	$json->pretty (1);
	$json->convert_blessed (1);

	bless {worker => $json}, $class;
}

sub parse_string {
	my $self   = shift;
	my $string = shift;

	return $self->{worker}->decode ($string);
}

sub dump_struct {
	my $self  = shift;
	my $string = shift;

	return $self->{worker}->encode ($string);
}


1;