DB<111> @b = map {my $x=$_; ++$x} @a
 => (2 .. 11)

 DB<112> @a
 => (1 .. 10)