I don't know where all it comes into play but try this:

#!/usr/bin/perl
my $int = 999999999999999999999999999999999999;
print $int**$int,$/;
[download]

It outputs: 1.#Inf