$members->execute($alliance->{id});
my $i = 0;
while (my $member = $members->fetchrow_hashref){
+ $i++;
$member->{ODD} = $i % 2;
push @members,$member;
- $i++;
}
$BODY->param(Members => \@members);
}else{
$intel->{missionclass} = $intel->{mission};
}
+ $i++;
$intel->{ODD} = $i % 2;
push @intel,$intel;
- $i++;
}
$BODY->param(Intel => \@intel);
}else{
my @alliances;
my $i = 0;
while (my $alliance = $query->fetchrow_hashref){
+ $i++;
next if ($alliance->{score} < 1 && $alliance->{kscore} < 1);
$alliance->{ODD} = $i % 2;
push @alliances, $alliance;
- $i++;
}
$BODY->param(Alliances => \@alliances);
}