use bignum only => "GMP"; # GMP added later use strict; my $x = 43_112_609; warn "x isa " . ref($x). "!\n"; my $y = ( (2**$x) - 1 ); open my $out, ">", "huge.txt" or die $!; print $out "huge prime: ", $y, "\n";