perl -MMath::BigInt=:constant -e "print 123**17"

##</code><code>##

use Math::BigInt ':constant';
print 123**17;