[REBOL] Re: Search string x for any substring found in block y.
From: al:bri:xtra at: 13-Dec-2001 7:55
Louis wrote:
> findany: func [
Try: find-any: func [
> if find x y/count [true break]
Try: if found? find x y/:count [return true]
> if findany x y [print found]
Try: if find-any x y [print "found"]
And this is a better replacement for 'findany:
find-any: func [x [string!] Strings[block!]][
foreach String Strings [
if found? find x String [return true]
]
]
I hope that helps somewhat!
Andrew Martin
ICQ: 26227169 http://valley.150m.com/