Mercurial > eagle-eye

changeset 45:4d59ba5905f6

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
addressed the modules you need to install
author "Rex Tsai <chihchun@kalug.linux.org.tw>"
date Fri, 17 Oct 2008 12:55:59 +0800
parents 4f7bca0d6190 (diff) 1dbb3e3c8691 (current diff)
children 9466964ae5bb
files README
diffstat 2 files changed, 11 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/README	Fri Oct 17 02:10:33 2008 +0800
+++ b/README	Fri Oct 17 12:55:59 2008 +0800
@@ -14,6 +14,15 @@
 sheep.pl - find the sheep to kill, takes coordinate or default world view.
 
 = HOWTO =
+ * Install *many* perl modules. 
+libclass-dbi-autoloader-perl - Class::DBI::AutoLoader
+libclass-dbi-perl - Class::DBI
+libclass-dbi-sqlite-perl - Class::DBI::SQLite
+libhtml-tagparser-perl - HTML::TagParser;
+libio-compress-zlib-perl - IO::Uncompress::Gunzip
+libwww-perl - LWP
+libwww-mechanize-perl - WWW::Mechanize
+
  * Create the sqlite3 database 'ikariam.sqlite' first, based on ikariam.sql
    $ cat ikariam.sql|sqlite3 ikariam.sqlite
  * Create the config file, at ${HOME}/.eagleeye.pm. The file content are
--- a/enemy.pl	Fri Oct 17 02:10:33 2008 +0800
+++ b/enemy.pl	Fri Oct 17 12:55:59 2008 +0800
@@ -23,7 +23,7 @@
     # print Dumper($u->_data_hash);
     foreach my $city ($u->cities) {
         my $island = Ikariam::Island->retrieve($city->island);
-        my $robbery = $city->citylevel * ($city->citylevel - 1) * $u->trader_score_secondary / 10000;
+        my $capture = $city->citylevel * ($city->citylevel - 1) * $u->trader_score_secondary / 10000;
 
         printf("Name: %s\n", $city->cityname);
         if(defined($city->status))
@@ -36,7 +36,7 @@
             $island->x, $island->y, $island->id, $city->cityId);
         printf("Tradegood: %s\n", $tradegoodText[$island->tradegood]);
         printf("Wonder: %s\n", $wonderText[$island->wonder]);
-        printf("Robbery score: %d\n\n", $robbery);
+        printf("capture score: %d\n\n", $capture);
         # print Dumper($island->_data_hash);
         # print Dumper($city->_data_hash);
     }