# x is 2 to the 128th
my $x = Math::BigFloat->new(q(2.0));
$x->bpow(q(128));
# ...more stuff...
# $product starts as x!
  $product = $x->copy();
  $product->bfac();