Re: how to get the String as regularexpression

Have a look at the qr-operator

sample:

#!/usr/bin/perl

use strict;
use warnings;

my $extensions = qr/\.doc|\.gif/;

my @files = qw(test.doc test.gif test.png test.jpg);

for(@files){
    if($_ =~ $extensions){
        print "yes\n";
    }
}
[download]

Comment on Re: how to get the String as regularexpression Select or Download Code

Replies are listed 'Best First'.
Re^2: how to get the String as regularexpression by davorg (Chancellor) on Oct 03, 2006 at 14:43 UTC
qr// doesn't change the way that the string is interpolated into a regex - it simply precompiles the string into a regex (see the documentation). Using qr// with the code from the original post won't fix the problem. You have fixed the problem by dropping the spurious '\|' from the start of the regex. -- <http://dave.org.uk> "The first rule of Perl club is you do not talk about Perl club." -- Chip Salzenberg	[reply]

Replies are listed 'Best First'.

Re^2: how to get the String as regularexpression
by davorg (Chancellor) on Oct 03, 2006 at 14:43 UTC

qr// doesn't change the way that the string is interpolated into a regex - it simply precompiles the string into a regex (see the documentation).

Using qr// with the code from the original post won't fix the problem. You have fixed the problem by dropping the spurious '|' from the start of the regex.

--
<http://dave.org.uk>

"The first rule of Perl club is you do not talk about Perl club."
-- Chip Salzenberg

[reply]