./ip
$a=2
2
> $a**10
1024
> $a *= 3
6
> sprintf '%lx', ~$a
fffffff9
> use Digest::SHA 'sha256_hex'

> sha256_hex 10
4a44dc15364204a80fe80e9039455cc1608281820fe2b24f1e5233ade6af1dd5
> exit