package XML::RSS::Tools::Mine;

use base 'XML::RSS::Tools';
use strict;
use warnings;
use LWP::UserAgent;

#
#       Grab something via HTTP
#
sub _http_get {
  my $self= shift;
  my $uri = shift;

  my $ua = LWP::UserAgent->new;
  $ua->agent('my_user_agent');
  my $response = $ua->request(HTTP::Request->new('GET', $uri));

  return $self->_raise_error("HTTP error: " . $response->status_line) if $response->is_error;

  return $response->content();
}

1;