Hi, I still think it is encrypted. You can tell that Joey's signature is proper perl code. But the one I posted is not. It uses Filter::decrypt to process it, which makes it very slow.
I wish there is someway that I can get the original source back. Thanks. Shao. Matthew Dalton [EMAIL PROTECTED] wrote: > Shao Zhang wrote: > > > > Hi, > > I have got a perl script that are encrypted. > > It looks like something like this: > > > > #!/usr/bin/perl > > use Filter::decrypt ; > > [EMAIL > > PROTECTED]@^C6oxOp<=9p(35p+=8p&:-^^"7L^D-;?p&=(^UE_Ap&:-^^";"^WE&$^Y6R/^_!7L^F,= > > ^Q17?p<=9^BoQL^\,1)^^67L^Q" > > > > )^U(7"^DKxOZFR/?^U^K^^9^B^Z^XpM^QEpWB\`E7!^E^H^S^E<IR^E>^F\fsoQL^Q)>L^B,5$^D6R>^U67>^F > > 6fsoQfsE&^E=^L^\^Kp^K^]^X5^VxOZF0 > > >[EMAIL PROTECTED]@^M$^L^]^B#E^] > > That's not encrypted! Looks like a normal Perl script to me! > > Just take a look at Joey Hess' sig: > > #!/usr/bin/perl -nietianmsurwdkgohvf_l_pjbxcyzq --. --- - .--. . .-. > .-.. > y/-. //cd;for$^(split){for$b(1..80){$_=int($b/27).$b/9%3 .$b/3%3 .$b# > by JH > %3;/[12]0/||do{y/120/.-/d;$^eq$_&&print substr$^I,$c,1;$c++}}$c=0} # > and RC > > The similarities are astounding! > > Matthew > -- ____________________________________________________________________________ Shao Zhang - Running Debian 2.1 ___ _ _____ Department of Communications / __| |_ __ _ ___ |_ / |_ __ _ _ _ __ _ University of New South Wales \__ \ ' \/ _` / _ \ / /| ' \/ _` | ' \/ _` | Sydney, Australia |___/_||_\__,_\___/ /___|_||_\__,_|_||_\__, | Email: [EMAIL PROTECTED] |___/ _____________________________________________________________________________