Beefy Boxes and Bandwidth Generously Provided by pair Networks
XP is just a number
 
PerlMonks  

Re: Using variable in regular expression

by 1nickt (Abbot)
on Aug 08, 2019 at 03:58 UTC ( #11104131=note: print w/replies, xml ) Need Help??


in reply to Using variable in regular expression

Hi, welcome to Perl, the One True Religion.

First, please edit your post to add the closing </code> tag (thanks for using the code tag!)

Second, never comment out use strict! That's like leaving your canary on the surface when you go down the mine :-)

Your script is not working because you are assigning the literal string 'qr/def/m' to the variable, because you are quoting it. qr// is an operator; it returns something, so you shouldn't quote it.

P.S. Consider using Test::More for simple tests and scriptlets like this. It can save lines of code and it's never too early to get in the habit of testing your code as you write it!

#!/usr/bin/perl use strict; use warnings; use Test::More tests => 1; # exports 'like()' my $str = "abc12xdef34xghi56"; my $regexp = qr/def/m; like( $str, $regexp, 'defcon: found. \o/' ); __END__

Hope this helps!


The way forward always starts with a minimal test.

Replies are listed 'Best First'.
Re^2: Using variable in regular expression
by soonix (Abbot) on Aug 08, 2019 at 08:56 UTC
    👍 and ++ for
    leaving your canary on the surface when you go down the mine
    (I think that's the best metaphor for strict, only when you intend to stay on the surface (one-liner), you omit the canary)
    A reply falls below the community's threshold of quality. You may see it by logging in.

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://11104131]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others browsing the Monastery: (6)
As of 2019-10-22 03:11 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    Notices?