🚀 go-pugleaf

[I posted this because I though you might be intrested.
Sorry if this is not the proper list. :)]
I am a research dedicated to doing arm chair research in
worms and source-code viruses. I have a Symbolics 3620 Lab 
Computer at my disposal and developed the following gem:

 (defmacro worm ()
   (let ((fname (gentemp 'INET)))
     `(progn
            (defun ,fname ()
              nil)
            (worm))))

This program generated 631 programs and clogged all the
computers I ran it on.
I need help decideing how to send it over a network and
control it so it does not crash the network it is 
traveling over.
It is my plan to study how to control the spread of and/or
detect worms or how to harnes the parelle nature of
such programs for useful applications implementing
distrubuted algorithms.
NOTE: I know it a not a worm because it can't traverse networks
but am presenting it as a prototype so that researchers in
distrubuted computing and infomation warfare will have a
springboard and be able to conduct futher research into
this and simular programs.
[I hope this helps you control your agents.]