CRYPTO: Become an Arms Exporter

Michael Lorrey (
Thu, 09 Jan 1997 19:23:33 -0500

If you look in my sig, you'll now notice a 3 line PERL code for the RC4
encryption algorithm. With enough people shipping this sig all over the
world, the feds will have to arrest everyone or lose cases due to
capricious enforcement.

Michael Lorrey ------------------------------------------------------------ President Northstar Technologies Agent Inventor of the Lorrey Drive

Website: Now Featuring: My Own Nuclear Espionage Agency (MONEA) MIKEYMAS(tm): The New Internet Holiday Transhumans of New Hampshire (>HNH) ------------------------------------------------------------ Transhumanist, Inventor, Webmaster, Ski Guide, Entrepreneur, Artist, Outdoorsman, Libertarian, Arms Exporter-see below. ------------------------------------------------------------ #!/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]}