REBOL []

secure none

out: make string! 100000

words: copy []

foreach fields next read/lines %blaah.txt [
        checker: true
        clear words
        foreach word parse fields newline [append words word]
        firstword: pick words 1

        if firstword = "pluup" [
                clear fields
                checker: false checker
        ]

        either checker = false [
                clear fields
        ][
                append out fields
        ]
]

write %newblah.txt out

>Hi list,
>I've read a textfile with read/lines....is there an easy way to remove 
a
>line from the data?
>
>it goes something like:
>
>data: read/lines %blaah.txt
>
>if find data "plupp" [remove the line] <--- of course there oughta be 
some
>easy code there.. ;)
>
>Best Regards
>Stefan Falk
>
>

Reply via email to