Re: Playing God, somebody has to do it

Michael Lorrey (retroman@tpk.net)
Sat, 05 Apr 1997 15:23:13 -0500


John K Clark wrote:
>
> I want to play God and I think I'd be good at it. A vacuum needs filling,
> God probably doesn't exist, and even if He does the poor fellow will soon be
> fired for gross incompetence. Considering that the position is open, I see
> absolutely nothing wrong in applying for the job.
>
>

Here's a little excerpt from HotWired's ClubWired schedule for the week
showing how the internet is already having God-like memetic influence on
politics:

Wednesday, 9 April
6 p.m. PDT
David S. Bennahum, in Wired Talk

On the night of 17 November 1996, hours after Yugoslavian President
Slobodan Milosevic annulled democratic elections in Belgrade, messages
began to appear in a relatively tiny electronic bulletin board service
in Serbia. They called for mass demonstrations. Two days later, people
marched to uphold the elections. Journalist David S. Bennahumn was an
eyewitness to the Net's influence there and reports in "Wired" 5.04:
"For the first time, I saw how the Internet can lower a tipping-point
and accelerate a process of infection. In this case the idea being
spread was that of a viable democracy." But is communication enough
against clubs, guns, and tanks? Join us with David and host Bob Parks
for a discussion on the Serbian "Internet Revolution."

http://www.wired.com/nl.cgi/wired/5.04/belgrade/index.html

-- 
TANSTAAFL!!!
			Michael Lorrey
------------------------------------------------------------
mailto:retroman@tpk.net		Inventor of the Lorrey Drive
Agent Lorrey@ThePentagon.com
Silo_1013@ThePentagon.com	http://www.tpk.net/~retroman/

Mikey's Animatronic Factory My Own Nuclear Espionage Agency (MONEA) MIKEYMAS(tm): The New Internet Holiday Transhumans of New Hampshire (>HNH) ------------------------------------------------------------ #!/usr/local/bin/perl-0777---export-a-crypto-system-sig-RC4-3-lines-PERL @k=unpack('C*',pack('H*',shift));for(@t=@s=0..255){$y=($k[$_%@k]+$s[$x=$_ ]+$y)%256;&S}$x=$y=0;for(unpack('C*',<>)){$x++;$y=($s[$x%=256]+$y)%256; &S;print pack(C,$_^=$s[($s[$x]+$s[$y])%256])}sub S{@s[$x,$y]=@s[$y,$x]}