Help for this page
if ($swapper < $#population) { $population[$swapper] = $population[-1]; }
$population[$swapper] = $population[-1];