Re: Can LWP::Simple tranfer image urls?

[zentara]

On Fri, 20 Jun 2003 09:09:21 EDT, [EMAIL PROTECTED] wrote:

>Do I need to change the http header for transfering image urls?  I get errors 
>when I transfer a jpg:
>picture cannot be displayed because it contains errors.

It works well for me on linux.
This is one of my favorite scripts by Merlyn. :-)

#!/usr/bin/perl
use warnings;
use strict;

$|++;

use LWP::Simple;

my @models = qw(amy aurelie daniela elsa fernanda
heidi josie lujan michelle molly noemie shakara
shirley veronica yamila);

for my $model (@models) {
for my $id (1..9) {
my $url = sprintf
"http://sportsillustrated.cnn.com/features/2001/swimsuit/gallery/%s/%s_%d_lg.jpg",$model,
$model, $id;
my $file = "$model-$id.jpg";
print "$url => $file: ";
print +mirror($url, $file), "\n";
}
}
__END__


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]