Commit b1628c28 authored by Leigh Stoller's avatar Leigh Stoller

Add retry options to wget command.

parent 70117ca7
#!/usr/bin/perl -w #!/usr/bin/perl -w
# #
# Copyright (c) 2003-2014 University of Utah and the Flux Group. # Copyright (c) 2003-2015 University of Utah and the Flux Group.
# #
# {{{EMULAB-LICENSE # {{{EMULAB-LICENSE
# #
...@@ -192,7 +192,9 @@ if (! $pid) { ...@@ -192,7 +192,9 @@ if (! $pid) {
# Give parent a chance to react. # Give parent a chance to react.
sleep(1); sleep(1);
open(GET, "| nice -15 $WGET --no-check-certificate -q -O $localfile -i -") open(GET, "| nice -15 $WGET --no-check-certificate ".
"--timeout=30 --waitretry=30 --retry-connrefused ".
"-q -O $localfile -i -")
or die("Cannot start $WGET\n"); or die("Cannot start $WGET\n");
print GET "$URL\n"; print GET "$URL\n";
if (!close(GET)) { if (!close(GET)) {
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment