From 86ef1b12e2c6990c40a52aba8567aeba953e1b3a Mon Sep 17 00:00:00 2001 From: Akkadius Date: Sat, 23 May 2020 16:50:09 -0500 Subject: [PATCH] Strawberry Perl OOB has issue with getstore so lets use something else [skip ci] --- utils/scripts/eqemu_server.pl | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/utils/scripts/eqemu_server.pl b/utils/scripts/eqemu_server.pl index 86b108ecc..2b9bd4a7a 100755 --- a/utils/scripts/eqemu_server.pl +++ b/utils/scripts/eqemu_server.pl @@ -701,12 +701,11 @@ sub get_perl_version } sub get_windows_wget { - if (!-e "wget.exe" && $OS eq "Windows") { - eval "use LWP::Simple qw(getstore);"; + if (!-e "bin/wget.exe" && $OS eq "Windows") { if (!-d "bin") { mkdir("bin"); } - getstore("https://raw.githubusercontent.com/Akkadius/eqemu-install-v2/master/windows/wget.exe", "bin/wget.exe"); + `powershell -Command "\$ProgressPreference = 'SilentlyContinue'; Invoke-RestMethod -ContentType \"application/octet-stream\" -Uri https://raw.githubusercontent.com/Akkadius/eqemu-install-v2/master/windows/wget.exe -OutFile bin/wget.exe"` } }