Select Code to Download

sub find_holes {
  my @list = @{ shift() };
...
  my @vacancies = grep {$_} @notfound;
  return \@vacancies;
}