for my $i ( keys %lists ) {
  my $coderef = \&{ $i };
  &{ $coderef };
}