perl -e'$a="(.)"x15000;$_="a"x15000;/$a/;print "$15000\n";'
output:
a
Looks like it goes that far if you have the RAM.
perl -e'$b=unpack"b*",pack"H*","59dfce2d6b1664d3b26cd9969503";\
for(;$a<length$b;$a+=9){print+pack"b8",substr$b,$a,8;}'
My public key
| [reply] [d/l] [select] |