for (my $i = 0; $i <= $#list; $i += 2) {
  $list[$i] = 'hi';
}