Mailing List Archive: 49091 messages
  • Home
  • Script library
  • AltME Archive
  • Mailing list
  • Articles Index
  • Site search
 

[REBOL] Re: Newbie Q: Search and delete from a Block

From: dockimbel:free at: 9-Oct-2002 15:37

Hi Romano, En réponse à Romano Paolo Tenca <[rotenca--telvia--it]>:
> Hi, > > > I would do it like that : > > > > word-split: func [text [string!] value [string!] /local fst snd][ > > parse text [to value s: (fst: copy/part txt s) value s: (snd: > copy > > s)] > > reduce [fst snd] > > ] > > and i: > > word-split: func [s w][parse/all replace s w #{00} "^(0)"] > > 0 not in string :-(
Very smart and elegant solution! :-) (I usually do not use 'replace mezzanine in my code unless i don't care about speed) -DocKimbel.