Select Code to Download

#!/usr/bin/perl
use warnings;
...
print largest_prime_factor(20), "\n";
print largest_prime_factor(13195), "\n";
print largest_prime_factor(600851475143), "\n";

Results:
...
5
29