diff options
Diffstat (limited to 'util/stock.perl')
-rw-r--r-- | util/stock.perl | 2 |
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"; |