Mailing List Archive: 49091 messages
  • Home
  • Script library
  • AltME Archive
  • Mailing list
  • Articles Index
  • Site search

[REBOL] Re: designing dialects - was OWL

From: oliva:david:seznam:cz at: 29-Mar-2002 13:23

Hello Terry, Saturday, March 23, 2002, 1:48:51 AM, you wrote: TB> Ok, here ya go.. TB> Rebol [] TB> A: "Send an email to every email address there is telling people not to TB> send emails to me unless I've asked them to..." TB> b: ask "What do you want me to do?: " TB> if a = b [ TB> c: read/lines 6_billion_e-mail_addresses_for_$29.95.txt TB> foreach val c [ send val "Do not send e-mails to Carl Read unless he asks TB> you to."] TB> ] 6_billion_e-mail_addresses_for_$29.95.txt has to be quite large so I would prefere: emails: open/direct/lines 6_billion_e-mail_addresses_for_$29.95.txt while [found? email: copy/part emails 1][ send email "Do not send e-mails to Carl Read unless he asks you to." ] close emails Oldes:-)