You can just provide the defaults in the my $params = { @_ } declaration (unless as discussed in my parallel post):

sub foo {
  my $self = shift; 
  my $params = {
    param1 => 'default1',
    param2 => 'default2',
    @_
  };
}
[download]