ation;
use File::Basename;
use File::Path;
use File::Slurp;
use HTML::Entities;
use IO::File;
use JSON;
use Time::Local;
use Metabase 0.004;
use Metabase::Fact;
use Metabase::Resource;
use CPAN::T
a::FlexSerializer->new(
detect_compression => 1,
detect_json => 1,
output_format => 'json'
);
$self->{serializer2} = Data::FlexSerializer->new(
d
me = ref $fact;
$facts{$name} = $fact->as_struct;
$facts{$name}{content} = decode_json($facts{$name}{content});
}
return \%facts;
}
sub parse_report {
my ($self,%hash) =