On Sat, Feb 03, 2001 at 01:08:26PM -0800, Bill Becker wrote:
> 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!
It doesn't...
> 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
In addition to what Chris pointed out...
> #!perl -sp0777i<X+d*lMa^*lN%0]dsXx++lMlN/dsM0<j]dsj$/=unpack('H*',$_);
That looks extremely unlikely as a #! line.
> $_='echo 16dio\U$k"SK$/SM$n\EsN0p[lN*11K[d2%Sa2/d0$^Ixp"|dc';
Those single quotes presumably should be backticks.
> s/\W//g;
> $_pack('H*',/((..)*)$/)
That line is not syntactically correct. I think there should be an equals
sign between $_ and pack.
Ronald