foreach my $item ($a, 2, $c) {
  $item = 1;
}