配列の代入について質問があります。

my(@a, @b) = (@x, @y);
とすると、
@a == (@x, @y)
@b == undef
となりますが、
@a == @x
@b == @y
とする簡単な方法はありますでしょうか？

サブルーチンへの引数として二つのリストを渡すときに
問題になると思いますので、簡単な方法があるのでは
ないかと思いますがいかがでしょうか？それともわざわざ
二つのリストの長さも引数として渡さなければならないの
でしょうか？