ce::autoclean;
use Bio::Community::Member;
use Bio::Community::TaxonomyUtils;
use JSON::XS qw( decode_json encode_json );
use DateTime;
use constant BIOM_NAME => 'Biological Observation Matrix
);
has '_json' => (
is => 'rw',
#isa => 'JSON::XS',
required => 0,
init_arg => undef,
default => undef,
lazy => 1,
predicate => '_has_json',
reader => '_get_json',
writer
lf->_get_max_col) {
$name = $self->_get_json->{'columns'}->[$col-1]->{'id'};
}
$self->_set_col( $col );
return $name;
}
method _parse_json () {
# Retrieve all text content
my $s