use LWP::Simple qw( get );

my $image = get("http://example.com/images/file.jpg");
defined($image)
   or die("Unable to fetch image\n");

my $image = GD::Image->new($image);