Years ago, someone on the cypherpunks mailing list had a sig about security through big numbers. Unfortunately I can't track down a reference. This, then, would be obscurity through big numbers.

#! /usr/bin/perl -w

use strict;

use Math::BigInt;my$J=new Math::BigInt<DATA>
;$_='';{my$A=1;sub _{qq{__(q(@{[lc$_[0]]}))}
}sub __{local$_=shift;(length>2)&&($A=1-${A}
)&&($_=ucfirst);$_}}my$P=036;while($J){my$H=
$J%$P;$J=($J-$H)/$P;$_=do{local$_=$H;tr/+//d
&&chr(63+$_)}.$_}s/(\w+)/_($&)/gee&&y/@?/ "/
&&eval
__DATA__
3269658930343791523110212544821057737304852999550
[download]