Большое число

# perl -MMath::Pari -e 'Math::Pari::allocatemem (102400000); \
  my $a = PARI 2; foreach my $t (3..$ARGV[0]) { $a = $a*PARI $t; } \
  print $a,"\n";' 1024000 | tee /tmp/bignum.out | wc -c
Real: 9342.94s User: 7013.11s System: 964.10s
5709835
( Само число )