for (values %list) { $_ = '=>'.$_ }

##</code><code>##

my @arr = %list;