RosettaCodeData/Task/Factorial/Perl/factorial-5.pl

3 lines
41 B
Perl

use bigint;
say length( 10000->bfac );