Select Code to Download

Select or download this

P:\test>findstr # LR-nearFactor.pl
#!/usr/bin/perl
...
P:\test>LR-nearFactor.pl 24777695232
11
1

Select or download this

====================
    Name: Math-Pari
...
Available Platforms:
       1. MSWin32-x86-multi-thread-5.8
====================

Select or download this

#!/usr/bin/perl
use strict;
...
    my $sqrt = sqrtint( $N );
    my @factor = prime_factors( $N );
....

Select or download this

P:\test>timethis TM-nearFactor.pl 55   & timethis LR-nearFactor.pl 55

...
TimeThis :    Start Time :  Sat Feb 26 14:39:07 2005
TimeThis :      End Time :  Sat Feb 26 14:39:25 2005
TimeThis :  Elapsed Time :  00:00:17.578

Select or download this

P:\test>timethis TM-nearFactor.pl 57   & timethis LR-nearFactor.pl 57

...
TimeThis :    Start Time :  Sat Feb 26 14:38:50 2005
TimeThis :      End Time :  Sat Feb 26 14:38:50 2005
TimeThis :  Elapsed Time :  00:00:00.109