sub ret_slice_array3 { return () = @_[0..$#_]; }