use Moose;
use JSON;

has content => (
    isa => 'Str',
    is  => 'ro',
    required=> 1,
);

has results => (
    isa => 'Str',
    is  => 'ro',
    lazy => 1,
    builder => '_build_results',
);

sub _build_results {
    my $self = shift;
    return decode_json($self->content);
}