Re^3: FIle Upload Error Help!

I've no idea what is in $img, other than it's a string. Perhaps all you want is:

  $url = new URI::URL($urls);
  $req = new HTTP::Request('GET', $url, $hdrs);
  $ua = new LWP::UserAgent;
  
  $resp = $ua->request($req);

  if ($resp->is_success) {
      open(IMAGE, ">../../img/$filename") or die "$!";
      binmode IMAGE;
      print IMAGE $resp->content;
  }
[download]

But then you may want to use LWP::Simple instead.

Comment on Re^3: FIle Upload Error Help! Select or Download Code

Replies are listed 'Best First'.
Re^4: FIle Upload Error Help! by Anonymous Monk on Jul 21, 2011 at 19:34 UTC
That I know works, I tried as well but I would like to read this image file before using the code inside of the `while` loop. Just in case the image been uplaoded is too big. The `$img` has the image itself from the urls.	[reply] [d/l] [select]
Re^5: FIle Upload Error Help! by JavaFan (Canon) on Jul 21, 2011 at 19:46 UTC
So, you're assuming that `read` is some magical function which you can feed a URL? Where did you get that idea from? And if you think that you can feed `read` a URL, why didn't you try to `read` to fetch the document containing the URL to the image? I'd use `LWP::Simple` and its `getprint` method. That will take a URL, and write it to the selected filehandle. Which is what you want.	[reply] [d/l] [select]
Re^5: FIle Upload Error Help! by cdarke (Prior) on Jul 22, 2011 at 07:20 UTC
I would like to read this image file before using the code inside of the while loop. Just in case the image been uplaoded is too big Not a good way of finding out the file size, the simplest is to use -s. For example: `my $size = -s IMAGE;` [download] or : `my $size = -s $filename;` [download]	[reply] [d/l] [select]