comparison 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
comparison
equal deleted inserted replaced
1:f9eac5385dc0 2:0fb73a7a0b94
1 #!/usr/bin/env perl 1 #!/usr/bin/env perl
2
3 use Class::DBI::AutoLoader (
4 dsn => 'dbi:SQLite:dbname=ikariam.sqlite',
5 options => { RaiseError => 1 },
6 tables => ['cities', 'islands'],
7 use_base => 'Class::DBI::SQLite',
8 namespace => 'Ikariam',
9 );
10
2 package Ikariam; 11 package Ikariam;
3 12
4 use Data::Dumper; 13 use Data::Dumper;
5 use LWP; 14 use LWP;
6 # use LWP::Debug qw(+ -conns); 15 # use LWP::Debug qw(+ -conns);