use strict; use warnings; use LWP; use LWP::Simple; my $sku = 49176; my $url = "https://mms.image.mckesson.com/CumulusWeb/Images/High_Res/$ +sku.jpg"; my $ua = LWP::UserAgent->new; my $resp = $ua->get($url); print $resp->code; my $path = '../data_files/' .$sku . '.jpg'; getstore($url, $path ) or die "Can't download: $@\n"
In reply to Re^2: How can I get images from urls - Getting 443 and 500 errors
by kevyt
in thread How can I get images from urls - Getting 443 and 500 errors
by kevyt
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |