how to get an image through perl ?

[Lastknight]

Hi all,

i am looking for your help regarding this topic...

I am trying to download a image from the web through perl program.

I have used Image::Grab module for that task,through the module i am able to download the image....

But my problem is i want to get that image to be stored in the particular file path,(eg)" /home/image" ..I dont know how to do this...can some one heil me to overcome this problem..

source:

use Image::Grab qw(grab);

$image = grab(URL=>'http://www.cricbuzz.com/gayle.jpg');

print "$image";

if i am using the above code i am able to download the images from the site..

but this part is not clear to me..

<--!
open(IMAGE, ">image.jpg") || die"image.jpg: $!";
binmode IMAGE; # for MSDOS derivations.
print IMAGE $pic->image;
close IMAGE;
--!>
kindly guide me to know this ....

regards...
lastknight..

[miller]

There should be nothing wrong with the code that you supplied in the comments. However, read this:

cpan lwptut

You should change image.jpg to an explicit path if you want to mirror gayle.jpg to a specific location.

use LWP::Simple;
 
mirror('http://www.cricbuzz.com/gayle.jpg', 'image.jpg');
 

- Miller