Share

I took some guy’s program to generate poems and tried to rework it into a invocation generators for my spur of the moment Chaplains….After 3 weeks I gave up 😉  Take it and create something special!

perl -le'sub w{substr("cococacamamadebapabohamolaburatamihopodito",2*int(rand 21),2).substr("estsnslldsckregspsstedbsnelengkemsattewsntarshnknd",2*int(rand 25),2)}{$l=rand 9;print "\n\nthe ".w."\n";{print w." ".substr("atonof",rand 5,2)." ".w;redo if $l-->0;}redo;}'

 

 

About The Author

ec.

Leave a Reply

Your email address will not be published. Required fields are marked *