use vars qw/%a_hash/;

BEGIN {
  $a_hash{key} = qw/val/;
}
.
.