my @new_a = map { $_+1 } @a;