Select Code to Download

my $tempA = Math::BigInt->new($a); 
$b = $tempA->bmodpow($M,$n);      #set b = a^m

use Math::BigInt;     #allows big integers needed for this algorithm

...
}