C:\>perl -MMath::GMP -le "print int(Math::GMP->new(311) ** 100);"
385227681