This script was given to me as being a Perl implementation of one of
the RSA crypto routines. Could (Would?) someone care to tell me which
one, and how it works? Details will yield a great BIG thanks!
Picture it strung all on one line as a one-line /bin/perl
implmentation, I think I split it correctly at the semi-colons...
Many thanks in advance,
Bill
#!perl -sp0777i<X+d*lMa^*lN%0]dsXx++lMlN/dsM0<j]dsj$/=unpack('H*',$_);
$_='echo 16dio\U$k"SK$/SM$n\EsN0p[lN*11K[d2%Sa2/d0$^Ixp"|dc';
s/\W//g;
$_pack('H*',/((..)*)$/)
