my $query = $DBH->prepare(q{SELECT id,name, relationship FROM alliances WHERE id = ?});
$alliance = $DBH->selectrow_hashref($query,undef,$1);
}
my $query = $DBH->prepare(q{SELECT id,name, relationship FROM alliances WHERE id = ?});
$alliance = $DBH->selectrow_hashref($query,undef,$1);
}