[REBOL] Re: Extract email address from line

From: hallvard:ystad:oops-as:no at: 6-Apr-2005 22:16

You could also try this:

source: {
blah blah blah blah [user1--company--com] blah blah blah
blah blah [user2--company--com] blah blah blah
blah blah blah blah [user3--company] blah blah
}

lines: difference parse/all source "^/" [""]
foreach line lines [
        words: parse line none

        foreach word words [ if email? load word [ print join "Current user is: " word ] ]
]

Hallvard

Dixit Stuart Hunter (18.54 06.04.2005):

1 · 2 · 3 · 4 · 5 · [6] · 7 · See whole thread