in reply to Perl RSA script error
print pack"C*",split/\D+/,`echo "16iII*o\U@{$/=$z;[(pop,pop,unpack"H*",<> )]}\EsMsKsN0[lN*1lK[d2%Sa2/d0<X+d*lMLa^*lN%0]dsXx++lMlN/dsM0<J]dsJxp"|dc`
Note that this works by feeding all the computational stuff to dc (in fact, that's why there must be backticks or similar there!). If you don't have dc, try a different version of the, er, munition.
|
|---|