my ($x, undef, $y) = something()...;