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

##</code><code>##

$population[$swapper] = $population[-1];