CPAN::Groonga

package Forex;

use JSON::XS;
use DateTime;
use LWP::UserAgent;

our $LASTERROR = undef;

$VERSION  = '1.2';

=pod

=head1 NAME

Forex - Historic Foreign Exchange Rates from Open Exchange Rates 

=hea

e->is_success )
	   { $self->{ 'CONTENT' } = decode_json $response->decoded_content; $LASTERROR = undef; }
	else
		{ $self->{ 'ERROR'} = decode_json $response->decoded_content;
		  $LASTERROR = 1; }
	

->{'API_HOOK' },
	  												 'historical'        ,
	  												 $request_day->ymd('-') . '.json' );

 	$self->{'REQUEST_URL'} .= '?app_id='   . $self->{'APP_ID'}
								  .   "&base="    . $se