foreach my $var ('a', 'b') {
   ...something that may modify $var...
   print($var);
}