Suchen mit Array - #80457 (Allgemeines zu Perl)

ptk

2004-03-02 12:54

User since
2003-11-28
3645 Artikel
ModeratorIn
[default_avatar]

[quote=kabel,02.Mar..2004, 10:16]

Code: (dl )

my $re_as_str = join "|", @havis_array;

[/quote]
Besser:

Code: (dl )

my $re_as_str = join "|", map { quotemeta } @havis_array;

, besonders wenn @havis_array nicht bekannt ist und Regexp-Metazeichen enthaelt.