[REBOL] Re: Quote character replacement
From: rgaither:triad:rr at: 26-Feb-2001 17:52
Hi Elan,
>strip-quoted-nl: func [string [string!] /local nl-rule] [
> nl-rule: [thru {"} to "^/" mark: (change mark " ") thru {"}]
> parse string [some [nl-rule | skip] ]
> string
>]
>
>print-strings-rule: [ set s string! (print mold s) | skip ]
>
>parse load strip-quoted-nl read %test-strings.txt [some
>print-strings-rule]
>
>YAA (Yet Another Approach)
Thanks!
All the YAA I've gotten from a simple task has been
very helpful.
Rod.
Rod Gaither
Oak Ridge, NC - USA
[rgaither--triad--rr--com]
