Mercurial > eagle-eye
diff Ikariam.pm @ 2:0fb73a7a0b94
ok, we done basic island scanning functions.
author | "Rex Tsai <chihchun@kalug.linux.org.tw>" |
---|---|
date | Tue, 07 Oct 2008 23:22:09 +0800 |
parents | f9eac5385dc0 |
children | b72786cdccbb |
line wrap: on
line diff
--- a/Ikariam.pm Tue Oct 07 22:56:12 2008 +0800 +++ b/Ikariam.pm Tue Oct 07 23:22:09 2008 +0800 @@ -1,4 +1,13 @@ #!/usr/bin/env perl + +use Class::DBI::AutoLoader ( + dsn => 'dbi:SQLite:dbname=ikariam.sqlite', + options => { RaiseError => 1 }, + tables => ['cities', 'islands'], + use_base => 'Class::DBI::SQLite', + namespace => 'Ikariam', +); + package Ikariam; use Data::Dumper;