if ( grep { $_ eq $input } @names ) { ... }