(%baz = %{$_->[0]}), (@bar = @{$_->[1]}) for [&foo()];