Modular exponentiation: Difference between revisions

m
→‎{{header|Perl}}: Update to 40 digits
m (→‎{{header|Java}}: Update to 40 digits)
m (→‎{{header|Perl}}: Update to 40 digits)
Line 85:
my $a = 2988348162058574136915891421498819466320163312926952423791023078876139;
my $b = 2351399303373464486466122544523690094744975233415544072992656881240319;
my $m = 10000000000000000000000000000000000000000;
my $m = 100000000000000000000;
print $a->bmodpow($b, $m), "\n";</lang>
Output:
Anonymous user