[REBOL] Re: Parse query
From: lmecir:mbox:vol:cz at: 12-Nov-2001 13:07
Hi John,
<<
(...)
Also can the rules enforce specific character sequences
e.g. dd/mm/yyyyy because my reading of a rule like
2 digit "/" 2 digit "/" 4 digit is that it would allow values like
31 /01/ 1997 i.e. embedded white space between terms?
John
(...)
>>
you can go like this:
digit: charset [#"0" - #"9"]
date: [2 digit #"/" 2 digit #"/" 5 digit]
dates: copy []
all-dates: [any [copy one-date date (append dates one-date) | skip]]
; notice the /all refinement enabling you to control spaces
parse/all "abcv 12/01/20001 ffdsa 03/06/30002 31/ 01/40005" all-dates
dates
== ["12/01/20001" "03/06/30002"]
Cheers
Ladislav