Hi John,

Here's a little script that retrieves a word document from a webserver and
saves it to the local filesystem.

<snip>
#!perl.exe -w

use strict;
use LWP::Simple;

my $url = 'http://somewhere.com/somedoc.doc';
my $sav = 'd:\mydoc.doc';

my $doc = get($url);

open(F,">$sav") || die "Cannot create file: $sav\n$!";
binmode F; #this is essential
print F $doc;
close(F);
</snip>

HTH

t0by


-----Original Message-----
From: John Crawford [mailto:[EMAIL PROTECTED]]
Sent: Monday, April 22, 2002 10:26 AM
To: [EMAIL PROTECTED]
Subject: Copying files via HTTP


I want to copy a variety of files from web addresses (.doc, .xls, .ppt).
What's the best way?
 
jmc
_______________________________________________
Perl-Win32-Web mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Reply via email to