naomi/dots
1
0
Fork 0
mirror of https://github.com/NaomiAmethyst/dots.git synced 2025-04-13 09:30:06 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

manual_fetch.pl: added curl support, and made it complain if curl nor wget are present

Browse source
This commit is contained in:
Adrian Kreher 2008-12-12 00:08:16 -06:00
parent 807841a2d0
commit 878552c544
1 changed files with 9 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
manual_fetch.pl Normal file → Executable file
View file

@ -21,7 +21,15 @@ extract_tgz($tgz);
sub http_fetch { sub http_fetch {
my $url = shift; my $url = shift;
return qx{wget -O - '$url'};
# See if we should use wget or curl
if(grep {-x "$_/curl"} split /:/, $ENV{'PATH'}) {
return qx{curl -s '$url'};
} elsif(grep {-x "$_/wget"} split /:/, $ENV{'PATH'}) {
return qx{wget -O - '$url'};
} else {
die "Could not find curl or wget, aborting!";
}
} }
sub extract_tgz { sub extract_tgz {