);
has 'decoder' => (
is => 'ro',
lazy => 1,
builder => sub {
require JSON;
return JSON->new();
},
);
has 'world' => (
is => ro =>,
required => 1,
);
has search
...
my $ua = $instance->ua();
=head2 C<decoder>
The C<JSON> Decoder object
my $instance = $class->new(
decoder => JSON->new()
);
=head2 C<world>
B<MANDATORY PARAMETER>:
$instance = $class->new( _ts => "mm-dd-yyy" );
=head2 C<_results>
Lazy builder that returns a C<json>-decoded version of the result of fetching C<uri>.
my $instance = $class->new( _results => {