is element in den zwei listen?

[i-netlab]

Hi,

Diese Frage wurde sicher scho mal gestellt, aber ich habe nichts gefunden...

Gibt es eine möglichkeit, um herauszufinden, ob ein element in beiden listen ist ohne zwei schleifen zu benützen? Oder ist es mit den schleifen am schnellsten?

ich mach das ggf. mit grep:

$x = 'rol';
@a = qw(erwin otto rolf ulla);

$x als ganzes Wort

if( $i = grep{/\b$x\b/}@a ){ print "$x ist in Liste\n" }

$x als Teilwort

if( $i = grep{/$x/}@a ){ print "$x ist in Liste\n" }

Gross~ Kleinschreibung egal

if( $i = grep{/$x/i}@a ){ print "$x ist in Liste\n" }

Ob eine Schleife schneller ist!? Keine Ahnung. Auf jeden Fall ist das da oben schneller getippt ;-)

Rolf