Sha256: aee6a4b7e88da9ec45ffa056092a02b05d602221a8b186187aa25cb079f7f293

Contents?: true

Size: 364 Bytes

Versions: 323

Compression:

Stored size: 364 Bytes

Contents

package Example;
use strict;
use warnings;

sub factors {
    my ($num) = @_;

	return [] if $num == 1;
    my @factors;
    my $i = 2;
	while ($i*$i <= $num) {
		my $div = $num/$i;
	    if ($div == int $div) {
            push @factors, $i;
            $num = $div;
            next;
        }
        $i++;
	}
	push @factors, $num;

    return \@factors;
}

1;

Version data entries

323 entries across 323 versions & 1 rubygems

Version Path
trackler-2.2.1.45 tracks/perl5/exercises/prime-factors/Example.pm
trackler-2.2.1.44 tracks/perl5/exercises/prime-factors/Example.pm
trackler-2.2.1.43 tracks/perl5/exercises/prime-factors/Example.pm
trackler-2.2.1.42 tracks/perl5/exercises/prime-factors/Example.pm
trackler-2.2.1.41 tracks/perl5/exercises/prime-factors/Example.pm
trackler-2.2.1.40 tracks/perl5/exercises/prime-factors/Example.pm
trackler-2.2.1.39 tracks/perl5/exercises/prime-factors/Example.pm
trackler-2.2.1.38 tracks/perl5/exercises/prime-factors/Example.pm
trackler-2.2.1.37 tracks/perl5/exercises/prime-factors/Example.pm
trackler-2.2.1.36 tracks/perl5/exercises/prime-factors/Example.pm
trackler-2.2.1.35 tracks/perl5/exercises/prime-factors/Example.pm
trackler-2.2.1.34 tracks/perl5/exercises/prime-factors/Example.pm
trackler-2.2.1.33 tracks/perl5/exercises/prime-factors/Example.pm
trackler-2.2.1.32 tracks/perl5/exercises/prime-factors/Example.pm
trackler-2.2.1.31 tracks/perl5/exercises/prime-factors/Example.pm
trackler-2.2.1.30 tracks/perl5/exercises/prime-factors/Example.pm
trackler-2.2.1.29 tracks/perl5/exercises/prime-factors/Example.pm
trackler-2.2.1.28 tracks/perl5/exercises/prime-factors/Example.pm
trackler-2.2.1.27 tracks/perl5/exercises/prime-factors/Example.pm
trackler-2.2.1.26 tracks/perl5/exercises/prime-factors/Example.pm