Re: problem saving binary data

2001-06-07 Thread Peter Scott
At 11:35 AM 6/5/01 -0500, you wrote: >(sorry 'bout the duplicate - bad data) > >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/imag

problem saving binary data

2001-06-07 Thread Jeff Davis
(sorry 'bout the duplicate - bad data) 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 "unabl

Re: problem saving binary data

2001-06-05 Thread Carl Rogers
At 11:38 AM 6/5/2001 -0500, Jeff Davis wrote: >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

RE: problem saving binary data

2001-06-05 Thread Hill, Ronald
[snipped] > 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"; > Hello, You need to specify a filename as an arg $ua->

Re: problem saving binary data

2001-06-05 Thread Timothy Kimball
Jeff Davis wrote: : 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

problem saving binary data

2001-06-05 Thread 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