[REBOL] Re: Parsing until the end
From: joel:neely:fedex at: 5-Jan-2003 16:12
Frantisek Fuka wrote:
> Let's say I have string like this:
> "XY" acts as sort of separator. Now, I want to extract the string
> that follows "XYXY" and ends right before the last XY. If there's
> no "XY" at the end, don't extract anything.
> So, the result of:
> my-magic-split "XYhelloXYpeopleXYXYhowXYareXYyouXY" "XY"
> should be: "howXYareXYyou" ;notice there's no "XY" at the end.
ffsplit: func [
if found? start: find str mid [
if end = find/last start: skip start length? mid end [
copy/part start (length? start) - length? end
which behaves as
>> ffsplit "XYhelloXYpeopleXYXYhowXYareXYyouXY" "XYXY" "XY"