use 5.010;
use bignum;
use warnings;
use strict;

my $x = shift || 100;
my $y = 2**$x - 1;

say $y;

##</code><code>##

echo '2^500000-1'|bc > /dev/null