sub markets {
	my $self = shift;
	
	if (@_) {
		$page = $self->handle->get('https://www.example.com');
		
		if ($page->is_success) {
   			$self->{'markets_json'} = $page->content; #JSON
		} else {
			croak "Can't get markets: ". $page->status_line();
		}
		
		$self->parse_markets();
	} else {
		return $self->{'markets'};
	}
}

sub parse_markets {
	my $self = shift;
	
}