in reply to Removing key/value pairs from a hash
my %norefs = map { $_ => $h{ $_ } } grep { ! ref $h{ $_ } } keys %h; [download]
I hope this works for you.
Cheers,
JohnGG