my $self = shift;
my $s = shift;
my $j = JSON->new();
+ my $content;
- return $j->loose->allow_barekey()->allow_singlequote()->decode($s);
+ ($content, undef) = $j->loose->allow_barekey()->allow_singlequote()->decode_prefix($s);
+ return $content;
}
1;