sub inplace_shuffle { @_[keys @_] = shuffle @_ } inplace_shuffle (values %foo);