LSTSRV-L Archives

LISTSERV Site Administrators' Forum

LSTSRV-L

Options: Use Monospaced Font
Show Text Part by Default
Show All Mail Headers

Topic: [<< First] [< Prev] [Next >] [Last >>]

Print Reply
Eric Thomas <ERIC@FRECP11>
Tue, 17 Mar 1987 23:25 SET
text/plain (24 lines)
/* Funny REXX program */
lists = 'UG-L XMAILER NODMGT-L TECH-L (...) LSTSRV-L'
guys = 'SCHAFER@RICE (...)'
Do Words(guys)
   Parse var guys userid'@'node guys
   l = lists
   Do Words(l)
      Parse var l list l
     'CP SM RSCSHACK FAKEMSG' node userid 'BITNIC LISTSERV SIGNOFF' list
   End
End
Exit 'Hee hee...'
 
  Let's say that  the variable 'lists' is  all the lists from  BITNIC, and the
variable 'guys'  is (just an  example) all the  subscribers from a  large list
like  TECH-L. Now  the weenie  running this  program off  his UREP  deck (yup,
someone told me  he's writing a REXX  interpreter for UN*X... ;-)  ) will have
removed most  of the subscribers from  all the BITNIC lists  in less execution
time than it took me to write this sample program. You're not asking pemission
to signoff,  you're asking the  list owner to  validate your command  with the
list password. I doubt ANY owner would validate 500 mass deletion requests...
 
  Eric

ATOM RSS1 RSS2