Select Code to Download

sub { @_[0..$#_] = qw/r s t/ }->(values %hash);

sub lvalues (\%) : lvalue { values %{$_[0]} }
(lvalues %hash) = qw/i j k/;  # works!

(lvalues %hash) = shuffle values %hash;