Script Library: 1240 scripts
 

webfind.r

REBOL [ Title: "Search a Web Page" Date: 20-May-1999 File: %webfind.r Purpose: { Search a web page for a string, and save the page to a file if it was found } library: [ level: 'beginner platform: none type: none domain: [web file-handling other-net] tested-under: none support: none license: none see-also: none ] ] page: read http://www.rebol.com if find page "jobs" [write %result.html page]
halt ;; to terminate script if DO'ne from webpage