my %hash= initvalues();

...

%hash= initvalues();

...

sub initvalues {
  return ('a'=>0, ...);
}