[ 1:35:13.75] P:\test>perl -MMath::BigInt -wle"$n=Math::BigInt->new( 19937 ); print $n->bfac;"
2174930234150431374566653562545349453159548764005915598228287343243610
0399250094165681781366521424136575314821986705545783026313111819773987
2047105789330953704693263375025834056482446086707947547228857444817043

...
<< 1000 similar lines snipped.>>
...
0000000000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000000

[ 1:37:02.13] P:\test>