Select Code to Download

my @phonesearch = grep @name, @phonelisting;

my @phonesearch;
foreach my $name (@names) {
  push(@phonesearch, grep(/$name/, @phonelisting));
}