for my $b (@a) {
...
}

##</code><code>##

$b *= 2;