$Data{gen} = {
   'beholder' => {b => 1, pg => 21},
   'death kiss' => {pg => 21},
   ...
};