Select Code to Download

#! perl -slw
use strict;
...
P:\test>432558 200000
200000 primefactors ( 5 5 5 5 5 2 2 2 2 2 2 )
200000 (447.213595499958} : 400

#! perl -slw
use strict;
...
P:\test>432558  1995
1995 primefactors ( 19 7 5 3 )
1995 (44.6654228682546} : 35