print +(grep {/$elem/} @array) ? "Yes" : "No";

$ cat ./arr
#!/usr/bin/perl

my @arr = (100 .. 110);

my $elem = 11;

print +(grep { /$elem/ } @arr) ? 'Yes' : 'No';
$ ./arr
Yes$
[download]

Hmm... You might want to reconsider your idea of equality :-)