Shawn Bower wrote: > > I'm trying to write a script that will open a socket connection to a > website and return a gif. I got it working to the point where and send > the request and receive the response, I was able to remove the HTTP > headers the only problem is that the GIF wont display properly. I > downloaded the gif via my browser and compared the files and the are > identical. Does it have something to do with the file to being binary > or something because I tried to set the mode to raw and that had no > effect. Any help would be appreciated. Code Below: > > #!/usr/bin/perl -w > use strict; > > use IO::Socket::INET; > use open IN => ":raw", OUT => ":raw";
Is there any reason you are not using LWP::UserAgent and HTTP::Request? I have had no problem doing the same thing with those two modules. perldoc lwpcook John -- use Perl; program fulfillment -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
