[REBOL] Re: Newbie parsing problem
From: joel:neely:fedex at: 29-Mar-2002 16:58
Hi, Richard,
Richard Coffre wrote:
> Hi,
>
> I would like to extract all the lines containing the string
> call and write them with a newline.
>
>> stuff: [
[ "I don't know what to call this block."
[ "Therefore it has no name."
[ "I cannot call it Change because."
[ "It would not be the Same."
[ ]
== [
"I don't know what to call this block."
"Therefore it has no name."
"I cannot call it Change because."
"It ...
>> foreach line stuff [if found? find line "call" [print line]]
I don't know what to call this block.
I cannot call it Change because.
-jn-
--
; Joel Neely joeldotneelyatfedexdotcom
REBOL [] do [ do func [s] [ foreach [a b] s [prin b] ] sort/skip
do function [s] [t] [ t: "" foreach [a b] s [repend t [b a]] t ] {
| e s m!zauafBpcvekexEohthjJakwLrngohOqrlryRnsctdtiub} 2 ]