#!perl -slw use Math::GMP; my $ret = Math::GMP->new('123' x 11); print Math::GMP::get_str_gmp($ret, 10); __END__ C:\_32\pscrpt\threads>perl gmp2.pl 123123123123123123123123123123123