Script Library: 1219 scripts
 

webcheck.r

REBOL [ Title: "Web Page Change Detector" Date: 20-May-1999 File: %webcheck.r Purpose: {Determine if a web page has changed since it was last checked, and if it has, send the new page via email.} library: [ level: 'intermediate platform: 'all type: 'Tool domain: [web email file-handling other-net] tested-under: none support: none license: none see-also: none ] Version: 1.0.0 Author: "Anonymous" ] page: read http://www.rebol.com page-sum: checksum page if any [ not exists? %page-sum.r page-sum <> (load %page-sum.r) ][ print ["Page Changed" now] save %page-sum.r page-sum send %luke--rebol--com page ]
halt ;; to terminate script if DO'ne from webpage
Notes
  • webcheck.r has documentation.
  • email address(es) have been munged to protect them from spam harvesters. If you are a Library member, you can log on and view this script without the munging.
  • (luke:rebol:com)