Select Code to Download

sub search {
    my $terms = shift;
...
        : grep { /$pattern/ } @names;
    return \@matches;
}