problem saving binary data

[Jeff Davis]

I'm using LWP to fetch an image and attempting to save it locally.
The file is successfully created, however all it contains is:

HTTP::Response=HASH(0x8380464)


Here's the code snippet: 

 $file = "/home/images/$name";
 open(IMAGE, ">$file") || die "unable to open filehandle $file \n";
 $saveres = $ua->request(HTTP::Request->new(GET => $pic));
 print IMAGE "$saveres";
        

 
Can someone point me in the right direction to fixing this?
Thanks!