最大质因数

作者：Gerhard R

https://projecteuler.net/problem=3

13195 的质因数是 5、7、13 和 29。

600851475143 的最大质因数是多少？

源代码：prob003-gerdr.pl

use v6;

sub largest-prime-factor($n is copy) {
    for 2, 3, *+2 ... * {
        while $n %% $_ {
            $n div= $_;
            return $_ if $_ > $n;
        }
    }
}

say largest-prime-factor(600_851_475_143);