Copying using LWP::Simple

[Lara J. Fabans]

At 09:16 PM 8/11/2001 -0700, Randal L. Schwartz wrote:
>How about simply:
>
>     use LWP::Simple;
>     my $url = "http://www.cobbler-sw.com/images/birds1.jpg";;
>     (my $file = $url) =~ s/.*\///s;
>     mirror($url, $file);


For those taking notes, this did work.  I was trying to put it into a different
directory then where the script is running from, so I had tried opening
a directory.  Didn't work.  So, I put in
my $filepath = $directory . "/" . $file;

and it copied it to the correct directory.  I'd thought mirror was for a 
whole passel of
files, and it works well for one.

Thanks, again, Randal & everyone else who helped.
---------------------
Lara J. Fabans
Lodestone Software, Inc
[EMAIL PROTECTED]


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