regular expression for "time-of-day" is not working

Hello monks,

My regular expression for time-of-day is not working as expected.

Regular expression below is matching "99:02 pm" which is incorrect. What went wrong?

@a = ("9:17 am", "12:30 pm", "99:02 pm", "99:99 pm");
foreach $i (@a)
{
    print "$i\n" if($i =~ /(1[012]|[1-9]):([0-5][0-9]).([aApP][mM])/);
}
[download]

Comment on regular expression for "time-of-day" is not working Download Code
Re: regular expression for "time-of-day" is not working by moritz (Cardinal) on Apr 05, 2012 at 09:43 UTC
The regex matches `9:02 pm`, and since you haven't anchored it, the regex match comes out true even if it didn't match the whole string. Use at least a word boundary: `/\b(1[012]\|[1-9]):([0-5][0-9]).([aApP][mM])\b/` [download] See perlretut and perlre for more details. Perl 6 - second systems done right	[reply] [d/l] [select]
Re^2: regular expression for "time-of-day" is not working by vjvalor (Initiate) on Apr 05, 2012 at 09:54 UTC
Thank you moritz.	[reply]
Re: regular expression for "time-of-day" is not working by choroba (Prior) on Apr 05, 2012 at 09:43 UTC
Your regular expression is missing ^ ath the start and $ at the end.	[reply]
Re: regular expression for "time-of-day" is not working by DrHyde (Prior) on Apr 05, 2012 at 09:58 UTC
It's got other problems too. It won't match "09:02" or "23:02" or "00:02". You probably want something like this ... `/\b ( ( ([01][0-9]\|2[0123]):[0-5][0-9] ) \|( (1[012]\|[1-9] ):[0-5][0-9]\s+[ap]m ) ) \b/ix` [download]	[reply] [d/l]
Re^2: regular expression for "time-of-day" is not working by vjvalor (Initiate) on Apr 05, 2012 at 12:02 UTC
Thanks you DrHyde. I was interested in 12-hour time format with no preceding 0.	[reply]
Re: regular expression for "time-of-day" is not working by Anonymous Monk on Apr 05, 2012 at 18:54 UTC
Regexp::Common::time	[reply]


There's more than one way to do things
	PerlMonks

regular expression for "time-of-day" is not working

How many continents have you visited?