bharatbsharma has asked for the wisdom of the Perl Monks concerning the following question:
i use reg exp like this17-08-2010 10:57:22 141-9997 Critical "OEM:imst2k19:4"
if ($var =~ /^((0[1-9]|[12][0-9]|3[01])-(0[1-9]|1[012])-(20)?\d\d\s\w +)/) { }
I am matching string starting with date in DD-MM-YYYY format and any space and a word character following that.
Now I want to put some more restriction that this string should contain something or nothing in double quote in the end. i.e string starting with date then white space then some characters then ending with double quotes where something or nothing can be withing double quotes eg. "OEM:imst2k19:4" or ""
How existing reg exp can be modified?
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re: Regular exp - modification
by Ratazong (Monsignor) on Aug 18, 2010 at 06:39 UTC | |
|
Re: Regular exp - modification
by JavaFan (Canon) on Aug 18, 2010 at 10:12 UTC | |
|
Re: Regular exp - modification
by umasuresh (Hermit) on Aug 18, 2010 at 16:26 UTC |