Select Code to Download

our $ZERO = Math::BigInt->new(0);
our $ONE = $ZERO + 1;
...
      );
   };
}

my $num = Math::BigInt->new("1" . ("0" x (ARGV[1] // 0)));