The best method is

foreach $foo(@foo)
{
  $bar = $some + $thing;
}
[download]

no need for an intermediary step unless you're doing something with $bar.

If $bar has a default value, set it to that value, otherwise undef.