use Math::BigInt;
print Math::BigInt->new(1000)->bfac();