Mercurial > eagle-eye
comparison Ikariam.pm @ 28:99723b8f348b
added rule_corruption
author | "Rex Tsai <chihchun@kalug.linux.org.tw>" |
---|---|
date | Fri, 10 Oct 2008 04:42:05 +0800 |
parents | dd85b55eec2a |
children | dbec53e754e3 |
comparison
equal
deleted
inserted
replaced
27:dd85b55eec2a | 28:99723b8f348b |
---|---|
297 $self->{'cities'}->{$cityId}->{happiness_text} = $happiness[$j]; | 297 $self->{'cities'}->{$cityId}->{happiness_text} = $happiness[$j]; |
298 } | 298 } |
299 } | 299 } |
300 | 300 |
301 # Space, 房屋數 | 301 # Space, 房屋數 |
302 $self->{'cities'}->{$cityId}->{"space"} = {}; | |
302 foreach my $j (qw/occupied total/) { | 303 foreach my $j (qw/occupied total/) { |
303 my ($elem) = $html->getElementsByAttribute("class", sprintf("value %s", $j)); | 304 my ($elem) = $html->getElementsByAttribute("class", sprintf("value %s", $j)); |
304 if(defined($elem)) { | 305 if(defined($elem)) { |
305 $self->{'cities'}->{$cityId}->{"space_" . $j} = $elem->innerText(); | 306 $self->{'cities'}->{$cityId}->{"space"}->{$j} = $elem->innerText(); |
306 } | 307 } |
307 } | 308 } |
308 | 309 |
309 # Actions | 310 # Actions |
310 # <span id="value_maxActionPoints">1</span> | 311 # <span id="value_maxActionPoints">1</span> |