REBOL [
    Title:   "Form Letter"
    Date:    10-Sep-1999
    File:    %formletter.r
    Purpose: "Example of how to create an email form letter."
    Category: [misc email net 2] 
]

Database: [
    "Ms." "Ronda" "Adnor" "Hawaii"   ra@sanfran.dom
    "Ms." "Mari"  "Iram"  "New York" iram@miami.dom
    "Mr." "Bill"  "Clint" "Alcatraz" billc@bwh.dom
]

foreach [Mr-Ms first-name last-name place email] database [
    letter: rejoin [

"Dear " Mr-Ms " " last-name {,

We are interested in hearing more about your upcoming vacation
plans to } place { and what we can do to make your trip more
enjoyable.  } first-name {, you know you can contact us anytime to
find out more about the details of your travel package.

Have fun in } place {!

   Bob "Jetman" Bobbob
   Quantity Travel, Inc.
}
]
    print ["Sending to:" first-name last-name]
    send email letter
]