sub blah {
  ...
  return scalar(@array), @array, %hash;
}
 
@xarray = &blah(...);
%xhash = splice(@xarray, shift(@xarray));
