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

But your explanation was the other way round.

plz try to show us a reproducible code example instead of wording.

Cheers Rolf

( addicted to the Perl Programming Language)

Replies are listed 'Best First'.
Re^4: Multiline match
by arunbhargav (Novice) on May 23, 2013 at 16:33 UTC
    Sorry about the confusion, the following is the code I have been trying 
    my $str = "update
 patch-5.1.1.21510";
my $patch = "patch-5.1.1.21510.gpg";

if ($str =~/$patch/ms) {
   print "Yes \n";
}

    [download]
[reply]
[d/l]
      thats the way it works

        DB<105> $str = "update\npatch-5.1.1.21510.pgp";
 => "update\npatch-5.1.1.21510.pgp"

  DB<106> $patch = "patch-5.1.1.21510"
 => "patch-5.1.1.21510"

  DB<107> $str =~/\Q$patch/
 => 1

      [download]

      $patch must be included in $str not vice versa.

      No need for multiline because your pattern doesn't span multiple lines.

      '\Q' assures that regex syntax like '.' is escaped.

      Cheers Rolf

      ( addicted to the Perl Programming Language)

[reply]
[d/l]

      Along the lines of your initial code: 

      use strict;
use warnings;

my $PatchPath = "patch-5.1.1.21510.gpg";
my $output = "update
                       patch-5.1.1.21510";
my @array = split /\s+/, $output;
if (  grep { $PatchPath =~ /$_/  } @array ) {
      print "Match found\n";
}

      [download]

      SORRY: This post is somehow to far up in the chain. Should be a few posts further down...

[reply]
[d/l]

In Section Seekers of Perl Wisdom