diff options
author | jack <jack@63ad8ddf-47c3-0310-b6dd-a9e9d9715204> | 2004-05-03 05:58:08 +0800 |
---|---|---|
committer | jack <jack@63ad8ddf-47c3-0310-b6dd-a9e9d9715204> | 2004-05-03 05:58:08 +0800 |
commit | e443776eb7025c569df22f801965f0ec84798e35 (patch) | |
tree | a6200d5ccc57109dfece0b30180da83a9915785c /util/lunar-1,15run.pl | |
parent | 886fd091d3cc9e39e342e13e994fb63acb30c34b (diff) | |
download | pttbbs-e443776eb7025c569df22f801965f0ec84798e35.tar pttbbs-e443776eb7025c569df22f801965f0ec84798e35.tar.gz pttbbs-e443776eb7025c569df22f801965f0ec84798e35.tar.bz2 pttbbs-e443776eb7025c569df22f801965f0ec84798e35.tar.lz pttbbs-e443776eb7025c569df22f801965f0ec84798e35.tar.xz pttbbs-e443776eb7025c569df22f801965f0ec84798e35.tar.zst pttbbs-e443776eb7025c569df22f801965f0ec84798e35.zip |
merge trunk to branches and corrected confliction
git-svn-id: http://opensvn.csie.org/pttbbs/branches/Jaky.i18n@1919 63ad8ddf-47c3-0310-b6dd-a9e9d9715204
Diffstat (limited to 'util/lunar-1,15run.pl')
-rw-r--r-- | util/lunar-1,15run.pl | 11 |
1 files changed, 0 insertions, 11 deletions
diff --git a/util/lunar-1,15run.pl b/util/lunar-1,15run.pl deleted file mode 100644 index d4cd2f20..00000000 --- a/util/lunar-1,15run.pl +++ /dev/null @@ -1,11 +0,0 @@ -#!/usr/bin/perl -use lib '/home/bbs/bin/'; -use LocalVars; -# 每農曆初一, 十五就會跑一次 $ARGV[0] -# 資料來源 http://tw.weathers.yahoo.com/ -open FH, "$LYNX -source http://tw.weathers.yahoo.com/ | grep '民國'|"; -$din = <FH>; -close FH; - -($month, $day) = $din =~ /農曆 (.*?)月 (.*?)日/; -system("@ARGV") if( $day eq '一' || $day eq '一十五' ); |