summaryrefslogtreecommitdiffstats
path: root/util/stock.perl
diff options
context:
space:
mode:
Diffstat (limited to 'util/stock.perl')
-rw-r--r--util/stock.perl2
1 files changed, 1 insertions, 1 deletions
diff --git a/util/stock.perl b/util/stock.perl
index 1c4120ed..e9d57580 100644
--- a/util/stock.perl
+++ b/util/stock.perl
@@ -10,7 +10,7 @@ open(BBSPOST, " >etc/stock.tmp");
# Header
# ¤º®e
-my $url = 'http://quotecenter.jpc.com.tw/today_stock_price.htm';
+my $url = 'http://sii.tse.com.tw/html/T31';
open(WEATHER, "/usr/bin/lynx -dump $url |");
while(<WEATHER>) {
next if $_ eq "\n";