Hello [EMAIL PROTECTED]!
On 29-Dic-99, you wrote:
K> I wonder if I could butt in here. I responded to Petr's
K> message, but I think the example I used was so complicated
K> that everyone must have hit the delete button. Here's the same
K> challenge in a very simple form: Find a word (in the
K> conversational sense, not in the REBOL sense) beginning with
K> "t" and ending with "t" in the string:
K> "this is a testament to be searched"
K> with a single call to PARSE.
>> text: "this is a testament to be searched"
== "this is a testament to be searched"
>> parse/all text [
[ to "t" mark1: skip
[ any [
[ "t" mark2: " " to end |
[ no-space |
[ to "t" mark1: skip
[ ]
[ ]
== true
>> copy/part mark1 mark2
== "testament"
Regards,
Gabriele.
--
o--------------------) .-^-. (----------------------------------o
| Gabriele Santilli / /_/_\_\ \ Amiga Group Italia --- L'Aquila |
| GIESSE on IRC \ \-\_/-/ / http://www.amyresource.it/AGI/ |
o--------------------) `-v-' (----------------------------------o
