With:

sub foo (\%) { ... }
foo(%$hashref);
[download]

perl doesn't have to copy or expand the hash, but it will generate a new reference to it.