$string elementof @array?

[Cruz]

Hier vielleicht noch eine handlichere Variante:

Erst ein kleines Unterprogramm:

sub scan {
my $x = shift;
foreach (@array) {if ($x eq $_) {return TRUE;}}
return FALSE;
}# end sub

Und das kannst du jetzt mit deinem Element aufrufen.
Z.B.

if (&scan("Boris")) {print "Boris ist drin"}
else {print "Boris ist nicht drin"}

@array musst du im Unterprogram natürlich noch anpassen.

Gruß
Cruz