http://qs1969.pair.com?node_id=671833


in reply to Re^2: Making a hash of arrays from a while loop
in thread Making a hash of arrays from a while loop

You're right, and the workaround is to create a new array:
$hash{$key} = [ @array ];

If there are references inside the array, you'll need somthing like Storable::dclone.