Yet Another CPAN Grep

Data-CleanJSON ( P/PE/PERLANCAR/Data-CleanJSON-0.002.tar.gz, PERLANCAR, 2017; MetaCPAN )

Data-CleanJSON/lib/Data/CleanJSON.pm ( view source; MetaCPAN )

eanJSON;

our $DATE = '2017-01-03'; # DATE
our $VERSION = '0.002'; # VERSION

use 5.010001;
use strict;
use warnings;

use Exporter qw(import);
our @EXPORT_OK = qw(
                       clean_json_i

n_place
                       clone_and_clean_json
               );

sub _clone {
    if (eval { require Data::Clone; 1 }) {
        Data::Clone::clone(@_);
    } else {
        require Clone::PP;

e::PP::clone(@_);
    }
}

 # generated with Data::Clean version 0.44, Data::Clean::JSON version 0.37
 sub clean_json_in_place { 
 require Scalar::Util;
 state $sub_unbless = sub {     my $ref = shift