@a = qw( x y );          # scalar(@a) == 2
  @b = qw( foo bar quux );
  print $b[ 0, @a ];       # prints "quux"