for my $b (my@c = @a) {