print foreach HASH $obj->{param};   # or we don't like barewords

print foreach 'HASH' $obj->{param}; # or parhaps it's really in a pragma

use dereference qw/HASH/;
print foreach HASH $obj->{param};   # or it stays the same

print foreach %{$obj->{param}};