my %planet = (Coords => $coords, Planet => $planet, Race => $race, Size => "$size ($sizerank)"
, Score => "$score ($scorerank)", Value => "$value ($valuerank)", XP => "$xp ($xprank)"
, FleetValue => "$fleetvalue ($resvalue)");
my %planet = (Coords => $coords, Planet => $planet, Race => $race, Size => "$size ($sizerank)"
, Score => "$score ($scorerank)", Value => "$value ($valuerank)", XP => "$xp ($xprank)"
, FleetValue => "$fleetvalue ($resvalue)");