Documention for: countweb.r
Created by: btiffin
 on: 28-Apr-2007
Format: text/editable
Downloaded on: 30-Apr-2025

[h1 Usage document for %countweb.r
[contents
[numbering-on
[h2 Introduction to %countweb.r

[p This library script is an example for scanning web pages.
It scans a list of sites and counts the occurances of a
string.

[h2 countweb At a Glance

[asis
>> system/options/quiet: true
>> do %countweb.r
47 http://www.rebol.com
15 http://www.sassenrath.com
0 http://www.amiga.org
0 http://www.cnn.com
asis]

Counted the times the string REBOL occured in the listed site's home pages.

[h2 Configuring %countweb.r

[p Change the string to look for in the **string:** variable
[br Change the sites to scan in the **sites:** block

[h2 What you can learn

[h3 Easy web page reader
[p What other language do you know that can read in a web page with

**read http://sitename.com**

[h3 find/tail
[p This example show how easy it can be to scan through a page
of text with the line

[asis
while [page: find/tail page string] [count: count + 1]
asis]

[h3 set-words
[p That same line shows off REBOL assignment, or set-word in REBOL speak.

[h2 Credits

[li %countweb.r   original author: Unknown
[li Usage document by Brian Tiffin, Library Team Apprentice, [date