if ( grep { $string eq $_ } qw( Trig Sin Cos ) ) {
# ...
}