Beefy Boxes and Bandwidth Generously Provided by pair Networks
There's more than one way to do things
 
PerlMonks  

Re^3: Multiline match

by davido (Archbishop)
on May 23, 2013 at 16:51 UTC ( #1034989=note: print w/ replies, xml ) Need Help??


in reply to Re^2: Multiline match
in thread Multiline match

Let's look more closely:

my $str = "update patch-5.1.1.21510" my $patch = "patch-5.1.1.21510.gpg"; if( $str =~ /$patch/ms ) { print "Your Perl is broken!!!\n"; }

Your target string is "update patch-5.1.1.21510". Your pattern requires "gpg" at the end. There's no "gpg" in your target string. If that produced a match, it would be an indication that your Perl is broken, because it should not match. Your pattern requires "gpg" to be present in the target string. That requirement isn't met. NO MATCH.

Additionally, the "." character is a metacharacter that matches absolutely anything (that's what the /s modifier is doing for you). So even if you removed the 'gpg' from your pattern, it would still fail to match the target string because of the trailing '.' in the pattern, which would need to consume one more character at the end of your target string. Here's a target string that would match your pattern:

my $str = "update patch-5A1B1C21510\ngpg"; # ;)

You might want something like this:

my $patch = "patch-5.1.1.21510"; if( $str =~ m/\Q$patch\E/ ) { .... }

Here we're removing the "metacharacter" status of the dot, and also not requiring a 'gpg' extension.


Dave


Comment on Re^3: Multiline match
Select or Download Code
Re^4: Multiline match
by arunbhargav (Novice) on May 23, 2013 at 18:38 UTC
    Thank you, 3 months away from Perl, this is what I did, Pathetic!! Thanks to you all for your patience, Cant ask for more

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others romping around the Monastery: (11)
As of 2014-12-26 07:16 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    Is guessing a good strategy for surviving in the IT business?





    Results (167 votes), past polls