RealBin/../lib/";
use Qiime2::Artifact;
use Term::ANSIColor qw(:constants);
use Data::Dumper;
use JSON::PP;
use Data::Structure::Util qw/unbless/;
$Data::Dumper::Indent = 1;
$Data::Dumper::Terse =
ESET '';
}
sub serialize {
my $json = JSON::PP->new->ascii->pretty->allow_nonref;
my $obj = shift;
my $class = ref $obj;
unbless $obj;
my $rslt = $json->encode($obj);
bless $obj, $class
;
return $rslt;
}
sub deserialize {
my ($json, $class) = @_;
my $obj = decode_json($json);
return bless($obj, $class);
}