for (my $num = 0; $num <= $#names; $num++) {
    $names[$num] = 'unknown';
}