mirror of
https://git.freebsd.org/ports.git
synced 2025-05-25 07:26:29 -04:00
29 lines
882 B
Text
29 lines
882 B
Text
--- ./GetKp.orig 1999-02-12 06:42:01.000000000 +0100
|
|
+++ ./GetKp 2014-04-04 21:55:15.059689500 +0200
|
|
@@ -5,7 +5,7 @@
|
|
#
|
|
|
|
|
|
- require "ctime.pl";
|
|
+ use Time::CTime;
|
|
|
|
|
|
($Year, $Month, $Day) = &year_month_day();
|
|
@@ -19,7 +19,7 @@
|
|
}
|
|
|
|
|
|
- $grabcmd = "cd /tmp; wget --passive-ftp --tries 2 -q ftp://www.sec.noaa.gov/pub/indices/DGD.txt";
|
|
+ $grabcmd = "cd /tmp; fetch -q ftp://ftp.sec.noaa.gov/pub/indices/DGD.txt";
|
|
system "$grabcmd";
|
|
|
|
|
|
@@ -68,7 +68,7 @@
|
|
#
|
|
# Add in very latest stuff
|
|
#
|
|
- $grabcmd = "cd /tmp; wget --passive-ftp --tries 2 -q ftp://www.sec.noaa.gov/pub/latest/curind.txt";
|
|
+ $grabcmd = "cd /tmp; fetch -q ftp://ftp.sec.noaa.gov/pub/latest/curind.txt";
|
|
system "$grabcmd";
|
|
%lmonstr = ( "Jan", 1, "Feb", 2, "Mar", 3, "Apr", 4, "May", 5, "Jun", 6, "Jul", 7, "Aug", 8, "Sep", 9, "Oct", 10, "Nov", 11, "Dec", 12);
|
|
|