From: Michael Lorrey (retroman@tpk.net)
Date: Thu Jan 09 1997 - 17:23:33 MST
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.
--
TANSTAAFL!!!
Michael Lorrey
------------------------------------------------------------
President retroman@tpk.net
Northstar Technologies Agent Lorrey@ThePentagon.com
Inventor of the Lorrey Drive Silo_1013@ThePentagon.com
Website: http://www.tpk.net/~retroman/
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]}
This archive was generated by hypermail 2.1.5 : Fri Nov 01 2002 - 14:43:59 MST