I hope this helps!
>> str: "--- three dash!"
== "--- three dash!"
>> ble: copy ""
== ""
>> parse str [some [thru "---" copy rest to end (ble: rest) | thru
"===" copy rest to end (ble: rest)]]
== true
>> ble
== " three dash!"
>> str: "=== three equals!"
== "=== three equals!"
>> parse str [some [thru "---" copy rest to end (ble: rest) | thru
"===" copy rest to end (ble: rest)]]
== true
>> ble
== " three equals!"
Andrew Martin
Speaking in REBOL tongues...
[EMAIL PROTECTED]
http://members.xoom.com/AndrewMartin/
Online @ 33,600 Baud!
-><-