# big_factors() is my sub finding all the primes of a number.
my @result = big_factors(600851475143);
say max @result;

##</code><code>##

Can't call method "can" on unblessed reference at 
C:/Languages/Perl/perl/lib/Math/BigInt.pm line 2693.

##</code><code>##

$VAR1 = [
          [],
          bless( {
                   'value' => [
                                71
                              ],
                   'sign' => '+'
                 }, 'Math::BigInt' ),
          bless( {
                   'value' => [
                                839
                              ],
                   'sign' => '+'
                 }, 'Math::BigInt' ),
          bless( {
                   'value' => [
                                1471
                              ],
                   'sign' => '+'
                 }, 'Math::BigInt' ),
          bless( {
                   'value' => [
                                6857
                              ],
                   'sign' => '+'
                 }, 'Math::BigInt' )
        ];